for $i ( 0 .. $#array ) {
	print $array[$i];
}

##</code><code>##

for $i (@array) {
	print $i;
}