Help for this page

Select Code to Download


  1. or download this
    my @myMainArray = 
        map { [ $myArray[$_] .. $myArray[$_+4] ] } 
        grep { !($_ % 5) } 0 .. $#myArray;
    
  2. or download this
    my @myMainArray = 
        map  { 
    ...
            : [ $myArray[$_] .. $myArray[-1] ] 
        } 
        grep { !($_ % 5) } 0 .. $#myArray;