I remeber that we had a discussion abut alarm on windows. Perl 5.8.0 has this implemented ( I have the testing bud attached below). But I also tried flock, and It still saying not implemented on this platform.

Monks, should we compile a list of all "unimplemented functions" from prev version, and try them under 5.8? I am only aware of alarm, and flock, is there any other?

sub display_alarm {
    print join("-", localtime), "\n";
    die "alarm!";
}

$SIG{'ALRM'} = \&display_alarm;

print join("-", localtime), "\n";
alarm(10);
while (1) {
}
[download]