Help for this page
my @array1 = (1,2,3,4,5,6,7,8,3,5,6,3,8,1,7,8); my @newarray; ... push (@tmparray, $array1[$_]); } push (@newarray, [@tmparray]) if defined @tmparray;
my @array3; for (@newarray) ... } @array3 = sort @array3;