in reply to CSV Columns: Friend or foe?
perl -MData::Dumper -e '@header=split ",",<>;while(<>){ @{$AoH[$row++] +}{@header}=split ",";};print Dumper(\@AoH)' filename [download]