my $count = 0;
for ( ... ) {
    ... $names[ $count ]

    $count++;
}