Select Code to Download

Unable to create sub named "" at crash.pl line 15.

#!/usr/bin/perl

...
        print "child starting\n";
        1 while kill ALRM => getppid;
}