Select Code to Download

Can't locate method setDelimiter at rb.pl line 8.

my $csv = Text::CSV->new({ sep_char => '|' });

#!/usr/bin/perl

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

1 =>
2 =>
...
13 => GSM
14 => GSM
15 =>

Submit|GSM|GSM => 560