Select Code to Download

    ...
    print "\nAnd here comes the result of sorting the keys of that has
+h\n";
...
        printf "%10s is %25.15f km from here\n", $place, $distance{$pl
+ace};
    }
}