my ($rank) = grep {$sorted_array[$_] eq $my_target} 0..$#sorted_array;