perl - 如何使用 Perl 将字符串分成两部分？

Question

我有一个字符串，其中多个部分由制表符分隔:

 Hello\t2009-08-08\t1\t2009-08-09\t5\t2009-08-11\t15

我只想在第一个选项卡上将其拆分，以便“Hello”以 $k 结束，其余部分以 $v 结束。这不太有效:

my ($k, $v) = split(/\t/, $string);

我怎样才能做到这一点？

Answer 1

为了得到这个，你需要使用第三个参数 split() ，它为函数提供了要拆分的最大字段数(如果为正):

my($first, $rest) = split(/\t/, $string, 2);