Select Code to Download

use POE qw( Session Component::JobQueue );
...
sub process_job { my $job = shift; print "I got job $job\n" }

__END__