/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 vote220 views1 answer
Perl download images files
Perl
2 votes289 views1 answer
Perl replace substring
Perl
0 vote253 views1 answer
Perl @$
Perl
0 vote305 views1 answer
Perl sprintf YYYYMMDD sample
Perl
0 vote320 views1 answer
Move files to new directory
Perl
0 vote256 views1 answer
Perl make a new directory and change permissions
Perl
0 vote295 views1 answer
Perl mechanize infinite scroll with attempt count
Perl
0 vote263 views1 answer
Unique in perl
Perl
0 vote216 views1 answer
What is perl poetry
Perl
0 vote299 views1 answer
Perl running mechanize through tor
Perl