Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: While Loops

by kennethk (Monsignor)
on Jan 08, 2013 at 18:53 UTC ( #1012311=note: print w/ replies, xml ) Need Help??


in reply to While Loops

Your spec is a little ambiguous to me, but if I follow, you can do what you need using Slices and %, perhaps like:

for my $i (0 .. @data/100) { my $max = $i * 100 + 99; $max = @data - 1 if $max > @data - 1; print @data[$i * 100 .. $max]; }

Of course, you'd presumably want to do something between those prints.


#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.


Comment on Re: While Loops
Download Code
Re^2: While Loops
by tbone654 (Sexton) on Jan 08, 2013 at 19:07 UTC

    How about something like this?

    foreach $a (0..@data-1) { print or do something ; } ## end of foreach

    If you have the length of the array it knows then when to stop.

      1. You should not use $a as your index variable, or really ever as a generic variable. $a and $b have special meaning for sort.
      2. I'm unclear on how your strategy splits the array into chunks of 100 records. There are certainly a myriad of ways to get this done, but it's not obvious to me how this is one of them.

      #11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2014-09-02 07:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (20 votes), past polls