in reply to Sort by distance

Here is what you do, insert this
use Data::Dumper; print Dumper(\@zip_dist); #-------HERE IS THE PROBLEM---------#
Then, show us the output :)

How (Not) To Ask A Question