thread::signal

Shell Programming and Scripting
1

Hi,all!
Now ,I write perl for windows platform,and will use signal for asynchronous operations ,but I find it could bring some bugs if it is used incorrectly ,pls help!!! :smiley:

2

source code list:
#---------------------------------------------------------------------------
use Thread::Signal;

mkdir( "lockdir", 0755 );
$SIG{INT} = $SIG{QUIT} =
$SIG{PIPE} = $SIG{TERM} = $SIG{KILL}= \&unlock;
sub unlock
{
rmdir( $lockdir );
}
kill( 'INT', $$ );
...
#----------------------------------------------------------------------------
but it occurs complilation error,such as:
This perl was built for "ithreads", which currently does not support Thread.pm.
Run "perldoc Thread" for more information at D:/Perl/lib/Thread.pm line 216.

how could i do?:confused: