/Perl/Perl split array into smaller arrays

Perl split array into smaller arrays

    my @array = (1, 2, 3, 4, 5, 6, 7, 8, 9, 10);
    my $numberofarrays = 10;
    my @splitArray;
    
    while (@array) {
        foreach    (0..$numberofarrays-1){
            if (@array) {
                push @{$splitArray[$_]}, shift @arrays;
            }
        }
    }

Similar codes

1 vote427 views2 answers
Perl http request
Perl
0 vote432 views1 answer
Perl make a new directory and change permissions
Perl
1 vote453 views1 answer
Perl print @INC
Perl
0 vote511 views1 answer
Move files to new directory
Perl
0 vote451 views1 answer
Perl remove all whitespace
Perl
0 vote485 views1 answer
Perl mechanize check mirror response for errors
Perl
0 vote466 views3 answers
Perl list files and folders in a directory
Perl
0 vote489 views1 answer
Perl hash ref create
Perl
0 vote440 views1 answer
What is the index number of the last element of an array with 9 elements?
Perl
0 vote467 views1 answer
Perl exit loop example
Perl