Select Code to Download

$array = $attrs->{csv_csv_in}->getline ($tbl->{fh}) or
    croak "Missing first row";

# open_table (0 is used up to and including DBI-1.1611
# Later versions use open_file (see DBD::CSV::Table)