Hello, I have aquestions.
If I need an alarm signal alarm(), in less than 1 second what can I do? Would that work? sub selfalarm { $waittime = @_; if ($pid = fork){ } else { $ppid = getppid(); select (undef,undef,undef, $waittime); kill 14 => ppid; } } SIG{ALRM} = sub {die;} $c = 0; eval { &selfalarm("0.1"); $c++; }; -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]