for ( my $i = 0; $i < $#array; ++$i )

##</code><code>##

  for ( my $i = 0; $i <= $#array; ++$i )

##</code><code>##

  for ( my $i = 0; $i < @array; ++$i )

##</code><code>##

  for ( my $i = 0; $i <= $#array - 1; ++$i )