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

##</code><code>##

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