>>707=711
for (my $i = 0; $i <= $#hoge; ++$i) {
...
}
という手も有り。