123456 #!/usr/bin/env perluse strict;use warnings;use Gearman::Driver::Console::Client;my $client = Gearman::Driver::Console::Client->new_with_options;$client->run;
#!/usr/bin/env perl
use
strict;
warnings;
Gearman::Driver::Console::Client;
my
$client
= Gearman::Driver::Console::Client->new_with_options;
->run;