Help for this page
#!/usr/bin/perl use strict; ... my @comment_state_names = map{($_->{comments}) ? $_->{state_name}: ()} +@rows; print join ",",@comment_state_names,"\n"; # West Virginia,Washington,
# Print each state and the counties that have a 'w' in them ... AK Ketchikan Gateway AK Prince of Wales-Hyder =cut