/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

0 vote312 views1 answer
Perl format decimal 2 places not rounding
Perl
0 vote378 views1 answer
Perl sprintf YYYYMMDD sample
Perl
0 vote377 views1 answer
Perl leading zeros formatting sprintf
Perl
0 vote376 views1 answer
Perl running mechanize through tor
Perl
0 vote366 views1 answer
Perl hash ref create
Perl
1 vote371 views2 answers
Perl array
Perl
0 vote370 views1 answer
Read a file in perl
Perl
1 vote343 views1 answer
Perl print @INC
Perl
0 vote301 views1 answer
What happened to perl 6
Perl
0 vote337 views1 answer
Perl remove all whitespace
Perl