Select Code to Download

#!/usr/bin/perl -w
use Text::CSV_XS;
...
    my $err = $csv->error_input;
    print "parse() failed on argument: ", $err, "\n";
}

1 => 12345
2 => Jim
...
12 =>
13 => 27-Apr-02
14 => 1234567