split问题求教!

xi0ws

回复 10# tanjiyong138
加括号的话，返回的list中包含括号中捕获的值


   

iLRainyday

在split中，如果有捕获型括号，那么捕获的结果会作为列表的内容一并返回。这种行为被称之为separator retention mode。具体的可以参考perldoc中split。

rubyish

这样:

1. my $s = "1(((55";
   
2. my @a = grep $_, split /(\()/, $s;

复制代码

jun413947139

1. my $line = "1(((55";
   
2. my @array = grep {$_ ne undef} split /(\()/, $line;
   
3. print scalar @array."\n";
   
4. print "@array\n";
   

复制代码

jun413947139

回复 10# tanjiyong138
想具体看看split的用法 perldoc -f  split
当split所用的正则表达式中  有 小括号，  意思是 分割返回结果包括分隔符（或者表达式）  
split /\(/, "1(5"     返回是 1 5
split /(\()/, "1(5"   返回时 1 （ 5