Help for this page
foreach (@zips){ @a = split /,/; ... } print "\n"; }
"Leesville","TX","78122","830","48177","Gonzales","P",