else { my $err = $csv->error_input; print "Text::CSV_XS parse() failed on argument: ", $err, "\n"; }