Gearman::Client::Async3pm

    use Gearman::Client::Async;
    # Instantiate a new Gearman::Client::Async object.
    $client = Gearman::Client::Async->new(
        job_servers => [ '127.0.0.1', '192.168.0.1:123' ],
    );
    # Overwrite job server list with a new one.
    $client->set_job_servers( '10.0.0.1' );
    # Read list of job servers out of the client.
    $arrayref = $client->job_servers;
    @array = $client->job_servers;
    # Start a task
    $task = Gearman::Task->new(...); # with callbacks, etc
    $client->add_task( $task );