Of course if | will never occur inside of a field you can just use split( /\|/, $_ ) instead of Text::CSV_XS. But if you need something fancier that deals with quotes and escaped seperators, then the CSV module is probably your best bet.