my $answer = ( sort { abs( $a - $dist ) <=> abs( $b - $dist ) } keys %$href )[0];