Select Code to Download

#!/usr/bin/env perl

...
else {
    print( "system() return $retval\n" );
}

test$ ./test.pl 
Alarm triggered, making system call...
system() retval = -1; $? = -1; $! = No such file or directory

System 1:
$ perl -v
...

test$ uname -a
Linux hostname.removed 2.6.9-55.0.6.ELsmp #1 SMP Tue Sep 4 21:36:00 ED
+T 2007 i686 unknown