Select Code to Download

#!/usr/bin/perl 
...
51 52 53 54 55 56 57
61 62 63 64 65 66 67

       push @{$ret[$j]}, @tmp[0..$J-1];