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
+---