for my $i (0 .. $#$arrayref)
{
    print "$i: $arrayref->[$i]\n";
    $i++;
}