my @zips=("52544", "52557", "50428", "50219"); foreach $zip (@zips) { ... }