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