for ( my $i = 10; $i--; ) { # do something } #### for ( my $i = 0; $i < $array_size; $i++ ) { # whatever }