Help for this page
#!/usr/bin/perl -w use strict; ... Last,First,Address,Apt,City,St,Zip,Email,Notes zacks,evan,123 main,,ann arbor,mi,48104,evan@zacks.org,perlmonks++
# pretty much the same as above (weak, i know) while (<>) { ... while (<>) { push @entries, { mapcar { @_ } \@fieldnames, [ split /,/ ] }; }