my $i;
for ($i = 0; $i <= $#arrayname; $i++) {
#do something
}