-All
I am needing some information about the alarm functionality for the Windows
environment. I am trying to get my program to die or in some cases
something else after a time limit has been reached. I've been working on it
the way O'reilly cookbook has been instructing, but it isn't working and
telling me that it is unsupported.
any help would be appreciated.
$SIG{ALRM} = sub {die "timeout"};
eval {
alarm(150);
};
if ($@) {
if ($@ =~ /timeout/) {
LogIt $logFile, "app timed out", 1
} else {
alarm(0);
exit (0);
}
}
Jarrod
**********************************************************************
This email and any files transmitted with it are confidential
and intended solely for the individual or entity to
whom they are addressed. If you have received this email
in error destroy it immediately.
**********************************************************************
Wal-Mart Stores, Inc. Confidential
**********************************************************************
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
