for (my $i = 0; $i <= $#array; ++$i) {
    print $array[$i];
}