#for (@1=1; @1<=10; @1++) #print @1

#for (@1=1; $grp:@1!=""; @1++) #print ($grp:@1)