Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: I/O Watchdog Daemon

by runrig (Abbot)
on Aug 22, 2012 at 17:18 UTC ( #989104=note: print w/ replies, xml ) Need Help??


in reply to I/O Watchdog Daemon

This won't help you at all, but just to be a pedant and provide a correct example for anyone else wanting to select a random file:

my @files = glob("/usr/bin/*"); my $range = $#files; #scalar(@files)-1; while (1) { my $random = int(rand($range));
should be (if you want to include the possibility of getting the last file in /usr/bin):
my @files = glob("/usr/bin/*"); while (1) { my $random = int(rand(@files));
But GlitchMr has it correct in his answer.


Comment on Re: I/O Watchdog Daemon
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://989104]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (13)
As of 2014-10-20 12:32 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (76 votes), past polls