/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

2 votes470 views1 answer
Perl replace substring
Perl
0 vote450 views1 answer
What is the index number of the last element of an array with 9 elements?
Perl
0 vote402 views1 answer
Ternary operator perl
Perl
76 votes483 views6 answers
Download league of legends
Perl
0 vote486 views1 answer
Read a file in perl
Perl
0 vote487 views1 answer
Perl mechanize infinite scroll with attempt count
Perl
0 vote486 views1 answer
Append string perl
Perl
6 votes494 views6 answers
Virtualenv
Perl
0 vote508 views1 answer
Perl leading zeros formatting sprintf
Perl
0 vote458 views1 answer
Perl remove all whitespace
Perl