Select Code to Download

#! /usr/bin/perl
use strict;
...
  print STDERR ">$pid{$pid}> reaped\n";
  delete( $pid{$pid} );
}

...<snip>...
>101> processing
...
>103> processing
>103> waiting for reap
*hangs*

my JAPH:
  print"Just another Perl hacker\n";
  #    ^ look, no space! pretty tricky huh?