Select Code to Download

first junk line then a blank line

   another junk line
fieldname1,fieldname2
value1,value2

use strict; use warnings;
use Text::CSV;

...
#warn "ret from _all: @$ret\n";

close ($fh) || die "CSV close($filename) failed: $!";

got columns: fieldname1 fieldname2