Event Timer in Perl

[SkyBlueshoes]

I have a script that uses an infinite loop, I'm wanting to be able to 
set a timer that when expired will run a subroutine, something sort of 
like Poe's callback timer feature. How would I go about doing this? I 
need to be able to set multiple timers on the fly within my script and 
have them only run once.

Sky Blueshoes
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>