Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re: sequential file handling

by maverick (Curate)
on May 30, 2002 at 23:07 UTC ( #170545=note: print w/replies, xml ) Need Help??

in reply to sequential file handling

Here's how to do just the 'round robin' part.
my @dirs = qw{ dir1 dir2 dir3 }; my $num_targets = $#dirs + 1; my $counter = 0; foreach (0..10) { my $target = $dirs[$counter % $num_targets]; print "$_ => $target\n"; $counter++; }
The % operator gives you the remainder of the division of $counter / $num_targets, which will be 0, 1 or 2 for any value of $counter. Use that number to select the proper directory out of the array.

Run this little snippet and you can see the result...

OmG! They killed tilly! You *bleep*!!

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (4)
As of 2016-10-25 23:33 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (330 votes). Check out past polls.