Help for this page
ID: 001 GRP:1 . ... . . ID:120 GRP:20
for (my $i = 1; $i < 7; $i++) { for (my $g = 1; $g < 21; $g++) { ... print "ID: $id\t GRP: $g \n"; } }