my $index;
for $index (0..$#values) {
    last if $values[$index] eq $value;
}