Hi

This is how you approach that , start a new file 

#!/usr/bin/perl --
# file: array-next50.pl
#
use strict;
use warnings;
use Data::Dump qw/ dd /;
my @vidids =  1 .. 422 ;
my @counts;
dd( \@vidids, \@counts );
while( ... ){
   my @ids = ...;
   push @counts, GetCounts( \@ids );
}
dd( \@vidids, \@counts );
sub GetCounts {
    my( $ids ) = @_;
    dd( $ids );
    return @$ids; ## its a test :D
}
__END__

[download]

The ... parts are for you to fill in

The condition in the while loop is where you check to see if the array is empty or if it has any more elements left

The @ids assignment is where you remove 50 elements from @vidids, so you're not just removing the first 50, you're splicing them from the top

For the answer to the .. parts you can search the Perl documentation or just check the perlfaq or search the free perl pdf book Modern Perl or check from our Tutorials section Arrays: A Tutorial/Reference

In reply to Re: Next 50 array elements during each loop? by beech
in thread Next 50 array elements during each loop? by Bman70

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.