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