- or download this
push @d_array, [ $csv->fields() ];
- or download this
@d_array = map { $csv->parse($_) ? [ $csv->fields() ]
: warn($csv->error_input), () }
<INFILE>;
- or download this
sub printRow{
my ($aref) = @_;
...
## call like this ..
printRow(\@d_array); # using & is deprecated