perl - 在perl中解析制表符分隔的文件

Question

所以我是一个巨大的 perl 新手，但我正在尝试将一个制表符分隔的文件解析为一个数组。我遇到的唯一问题是我的文件有不同数量的用于间距的制表符。

现在我正在做 @data = split("\t"); 但这只会删除一个选项卡，有没有办法在解析文件时删除所有选项卡？

Answer 1

您可以根据正则表达式进行拆分，因此如果您需要根据一个或多个 制表符进行拆分，请使用:

@data = split("\t+");

示例(Perl 调试器):

DB<1> $text = "one\ttwo\t\tthree\t\t\tfour"

DB<2> @data = split("\t+", $text)

DB<3> print join(", ", @data)
one, two, three, four