String跳过Perl中的字符

Question

我有这个字符串：

my $string = "Stuff1, stuff2, stuff3, stuff4";

我想将子字符串“stuff3”保存在另一个字符串中。例如，要保存stuff1，我使用以下内容：

$substring = substr($string, 0, index($string, ','));

基本上，这会占用所有字符，直到有','字符，这样，我将stuff1保存在不同的字符串中。如何保存字符串3？

谢谢，

Answer 1

你可以使用index来掠过它，但你最好将splitting整个事情放到数组中。

my @words = split /\s*,\s*/, "Stuff1, stuff2, stuff3, stuff4";
print $words[2];