@a=(0,1,2,3,4,5,6,7,8,9); foreach(@a){ print $_; }
@a=(0,1,2,3,4,5,6,7,8,9); foreach $i(@a){ print $i; }