Help for this page

Select Code to Download


  1. or download this
    
    # sort by zip-code 
    ...
        lc((split /\|\|/ => $hash{$a})[1]) cmp lc((split /\|\|/ => $hash{$
    +b})[1])
        } keys %hash;