Re: DLYJOb in Perl

[Blair Wyman <wyman@xxxxxxxxxxxx>]

Excerpts from midrange-l: 24-Nov-99 DLYJOb in Perl 
Amit.Mukherjee@smed.com (478*)  

> Is there an equivalent of DLYJOB in Perl . I want a Perl script  to do some  
> tasks repetitively in intervals.  

I've not done Perl on the AS/400, but the general Perl function is 
'sleep(n)' where n is the number of seconds to sleep.  IIRC, the AIX 
implementation does this with a signal, so it's a true wait and not some 
sort of CPU-intensive polling loop.  There's also 'alarm', but the 
perldoc advises not to mix sleep and alarm.  

The perldoc also advises that to sleep less at a finer granularity than 
one second, it's possible to use the syscall 'setitimer', but I doubt 
that the AS/400 Perl is so endowed.  

-blair  

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---