Select Code to Download

use strict;
use warnings;
...
}

print 'Found ',$#matches+1,' matches:',"\n  ", join("\n  ", @matches),
+"\n";

[duelafn@XYZZY bbdb]$ perl States.pl
Enter Search: Mishawaka, IN
...
Enter Search: 12345
Found 1 matches:
  SCHENECTADY                NY