The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package Test::Worker;

sub perform {
    my ( $job ) = @_;
    return $job->args;
}

1;