Select Code to Download

package Forking::Amazing;

...
   'a'..'z');                        # ids (one fork for each id)

=cut

#!/usr/bin/perl

...
my $end = time - $start;
dd \@answers;
print "forking time $end\n";