Help for this page

Select Code to Download

Select or download this

$ perl -wMstrict -e 'alarm 2; $SIG{ALRM}=sub{
    print "Timeout reached" };<>'
...
$ perl -wMstrict -e 'alarm 2; $SIG{ALRM}=sub{
    print STDERR "Timeout reached" };<>'
Timeout reached^C