my @myMainArray =
    map [ @myArray[$_ .. ($_+4 < $#myArray ? $_+4 : $#myArray)] ], 
    map $_ * 5, 0 .. $#myArray/5;