$ for J in {0,1,2,3,4,5,6,7,8,9}{0,1,2,3,4,5,6,7,8,9}{0,1,2,3,4,5,6,7,8,9}; do ./pm_sample_lines_from_file.pl a_million_lines 25 >t.$J; done