my $idx = best(\@numbers);
my $other = $data[$idx];