Select Code to Download

$ ./crowflight.plx Zaxo  # prints list of Monks reverse sorted by dist
+ance
baku,18308,62.8
...
$ ./crowflight.plx Thelonious    # no such Monk
Brother Thelonious has left the map
$

#!/usr/bin/perl -w

...
              bearing($monks{$monk}, $monks{$_}));}
             keys %monks;
}