Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
# worker.pl
...
my $result = $client->do_task( 'split_it', 'abc,def' );
print "Split: @$result\n";
  2. or download this
    Not a SCALAR reference at
 /usr/local/share/perl/5.8.8/Gearman/Worker.pm line 365.