Re: While Loops

by kennethk (Abbot)

on Jan 08, 2013 at 18:53 UTC ( [id://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];
}
[download]

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

Replies are listed 'Best First'.
Re^2: While Loops by tbone654 (Beadle) 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` [download] If you have the length of the array it knows then when to stop.	[reply] [d/l]
Re^3: While Loops by kennethk (Abbot) on Jan 08, 2013 at 19:29 UTC
You should not use `$a` as your index variable, or really ever as a generic variable. $a and $b have special meaning for sort. 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.	[reply] [d/l]

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://1012311]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others avoiding work at the Monastery: (3)

As of 2024-04-16 16:13 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found