$ for J in {1,2,5}0{0,00,000}; do echo $J; perl gen_random_string.pl $J ACGTN 15 25 >t.$J; done