I playing with Gearman::Client and below are my codes. Basically what I wanted to do is to send a string from the client and have the worker split them and return two strings.
#!/usr/bin/perl
# worker.pl
use strict;
use Gearman::Worker;
my $worker = Gearman::Worker->new();
$worker->job_servers( '127.0.0.1:4730' );
$worker->register_function( 'split_it',
\&my_split_function );
$worker->work() while 1;
sub my_split_function {
my $string = $_[0]->arg;
my @new_string = split( ',', $string );
return \@new_string;
}
-------
#!/usr/bin/perl
# client.pl
use strict;
use Gearman::Client;
my $client = Gearman::Client->new();
$client->job_servers('127.0.0.1:4730');
my $result = $client->do_task( 'split_it', 'abc,def' );
print "Split: @$result\n";
When I run the client.pl, it will give an error output on the worker.pl something like
Not a SCALAR reference at
/usr/local/share/perl/5.8.8/Gearman/Worker.pm line 365.
Does this mean that it is expecting the worker.pl to return a scalar reference? Since I'm trying to return an array reference, then it is failing?
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|