See which signal is sent when you to ^Z, if at all. Perhaps sleep x, or <STDIN> for blocking would be useful.while (defined (my $key = each %SIG)){ my $foo = $key; # for closures $SIG{$foo} = sub { print "I am SIG$foo\n" }; }
In reply to Re: Trapping for Control^Z
by nothingmuch
in thread Trapping for Control^Z
by Kri
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |