Windows und Signale sind so eine üble Sache mit Perl. Läuft meist nicht. :(

Linux:
root@pc1 ~ # perl
use 5.010;

$SIG{ALRM} = sub { die "BUMM!" };

say "Run Perly, run!";
alarm(3);
say <STDIN>;
say "Done, Perly done";
^D
Run Perly, run!
BUMM! at - line 3.



Windows (bricht nicht ab!):
U:\>perl
use 5.010;

$SIG{ALRM} = sub { die "BUMM!" };

say "Run Perly, run!";
alarm(3);
say <STDIN>;
say "Done, Perly done";
^Z
Run Perly, run!