标签： perl
我想从文件中获取前4个单词。这些单词可以用空格，换行符，回车符或制表符分隔。所以他们可以在同一条线上或四条不同的线上。我应该使用哪种方法？谢谢。
答案 0 :(得分：4)
继续阅读单词，直到你有至少四个：
perl -e 'push @words, split " ", <> while (@words < 4); print "@words[0..3]\n"; '