Help for this page

Select Code to Download


  1. or download this
    alarm 5;
$SIG{ALRM} = sub { print "alarm!\n" };
...
alarm!
yawn?  yawn
  2. or download this
    my $yawn;
eval {
...
__END__
Timed out.
yawn?