$| = 1; $SIG{ALRM} = sub {print "checking"}; #### $SIG{ALRM} = sub {print "checking\n"};