E:\>perldoc perlport|grep alarm
    alarm SECONDS
    alarm   Not implemented. (Win32)

E:\>perl -le"alarm 0"
The Unsupported function alarm function is unimplemented at -e line 1.


##</code><code>##

E:\>perl
local $SIG{ALRM} = sub { die "alarm!!!!" };
alarm 1;
sleep 10;
alarm 0;
__END__
alarm!!!! at - line 1.