http://qs321.pair.com?node_id=69272

belize has asked for the wisdom of the Perl Monks concerning the following question:

I am in the process of designing a search mechanism to find the closest matching ZIP code from a database. I've searched this site but have found nothing relating to ZIP codes.

The only way I can figure to date to accomplish this is:

This may be too elementary, but just wondering if there is a more elegant solution.