perl联合linux操作处理csv文件

本人实在懒得写脚本，在使用perl处理csv文件之前，就提前使用linux sed操作，将csv文件转换成tab格式的文本文件

cat table.csv | sed s'/","/\t/'g | sed s'/^"//'g | sed s'/"$//'g  > new_table.txt

然后使用perl直接读取new_table.txt文件