http://www.perlmonks.org?node_id=969810


in reply to Better method to cut columns from delimited file

Spreadsheet::Read comes with xlscat, which can filter rows and/or columns from CSV, XLS and other spreadsheet like formats:

$ cat test.csv NAME|AGE|CITY|ZIP AAA|23|STAT|60001 BBB|34|PPOR|12345 CCC|11|TRET|2345 $ xlscat --in-sep-char=\| -C1,3 test.csv NAME|CITY AAA|STAT BBB|PPOR CCC|TRET $

For CSV-like formatted files, it uses Text::CSV_XS.


Enjoy, Have FUN! H.Merijn