$ perl -e '@a = (1, 2, 3); for (0..@a) { print "A$_: $a[$_]\n" }' A0: 1 A1: 2 A2: 3 A3: [download]
-sam
In reply to Re^2: Foreach Loops by samtregar in thread Foreach Loops by hubb0r