regex - perl 正则表达式匹配表达式

Question

我正在使用以下指令解析文件中以空格分隔的行：

($F1,$F2) = split(/\s/,$_);

并排成一行

TEXT1 TEXT2 TEXT3

我不仅$F2需要。我怎样才能做到这一点 ？TEXT2 TEXT3TEXT2

谢谢

Answer 1

split可以传递第三个参数：LIMIT（即要拆分的字段数）。

($F1,$F2) = split(/\s/,$_,2);