Select Code to Download

eval {
      $var = #setup a network connection...;
...
                     flock $fh, LOCK_UN;};
      alarm(60);
    };

use strict;
use warnings;
...
15 secs: Child -23840 time is up!! I am gonna croak!
15 secs: Parenting talking...all my children are dead! Hooray!
A happy ending!

use strict;
use warnings;
...
Child -24392 time is up!! I am gonna croak!
Child -20296 time is up!! I am gonna croak!
Child -19896 time is up!! I am gonna croak!