Si recibe el siguiente error al ejecutar el código del cliente:

No se puede llamar al método “syswrite” en un valor indefinido en /usr/local/share/perl/5.10.1/Gearman/Taskset.pm línea 202.

… entonces cambia esto

$client->job_servers('127.0.0.1');

a

$client->job_servers('127.0.0.1:4730');

¡eso es todo!

🙂