關(guān)于split 的捕獲括號(hào)，理解不能 請(qǐng)教下老司機(jī)

45177659

As with regular pattern matching, any capturing parentheses
that are not matched in a "split()" will be set to "undef" when
returned:

       @fields = split /(A)|B/, "1A2B3";
       # @fields is (1, 'A', 2, undef, 3)

在split的man文檔最后有這樣一段話，簡(jiǎn)單翻譯下：作為正則表達(dá)式匹配，
任何在split()中沒(méi)有匹配的捕獲括號(hào)，將會(huì)被設(shè)成undef,然后返回。這個(gè)東西
是怎么理解的？

這是我實(shí)驗(yàn)的結(jié)果，哪位老司機(jī)能指點(diǎn)下，多謝！
Administrator@SWYWXQ1DHSU3MJ6 ~
$  perl -e '@fields = split /(A)|B/, "1A2B3"; print join "--", @fields'
1--A--2----3
Administrator@SWYWXQ1DHSU3MJ6 ~
$ perl -e '@fields = split /(A)|(B)|C/, "1A2BC3"; print join "--", @fields'
1--A----2----B--------3

jason680

回復(fù) 1# 45177659

1. without capture
$ perl -le '@fields = split /A|B|C/, "1A2B3C4"; print join ",", @fields'
1,2,3,4

2. capture together
$ perl -le '@fields = split /(A|B|C)/, "1A2B3C4"; print join ",", @fields'
1,A,2,B,3,C,4

usually, we don't use follow ways:
$ perl -le '@fields = split /(A)|B|C/, "1A2B3C4"; print join ",", @fields'
1,A,2,,3,,4

$ perl -le '@fields = split /A|(B)|C/, "1A2B3C4"; print join ",", @fields'
1,,2,B,3,,4

$ perl -le '@fields = split /A|B|(C)/, "1A2B3C4"; print join ",", @fields'
1,,2,,3,C,4

$ perl -le '@fields = split /(A)|(B)|C/, "1A2B3C4"; print join ",", @fields'
1,A,,2,,B,3,,,4

$ perl -le '@fields = split /(A)|(B)|(C)/, "1A2B3C4"; print join ",", @fields'
1,A,,,2,,B,,3,,,C,4

45177659

回復(fù) 2# jason680

i see! thanks


   

flw

轉(zhuǎn)載一下。

1. 發(fā)信人: flw (還沒(méi)想好), 信區(qū): Perl
   
2. 標(biāo)  題: Re: 不得不說(shuō)，perl太需要記憶了
   
3. 發(fā)信站: 水木社區(qū) (Thu Jul  5 23:06:32 2012), 轉(zhuǎn)信
   
4. 
   
5. 這個(gè)就是捕獲的意思。
   
6. 
   
7. @F = split $R, $S 類似于下面的代碼（不論帶不帶括號(hào)、哪里帶括號(hào)、帶幾個(gè)括號(hào)）：
   
8. 
   
9. while( @s = $S =~ $R ){
   
10.     push @F, 轉(zhuǎn)載一下。;
    
11.     push @F, @s;
    
12.     $S = ;
    
13. }
    
14. 
    
15. push @F, $S;
    
16. 
    
17. 由此可見(jiàn)，split 里的正則表達(dá)式捕獲和普通的正則表達(dá)式捕獲用法是完全一致的。
    
18. 
    
19. 【 在 arp (@arp) 的大作中提到: 】
    
20. : 怎么一樣啊。
    
21. : 明顯不一樣啊。
    
22. : ()在正則表達(dá)式捕獲里面是group
    
23. : ()在這里哪里有g(shù)roup的意思啊？

復(fù)制代碼

45177659

回復(fù) 4# flw

    push @F, 轉(zhuǎn)載一下。;
    push @F, @s;
    $S = ;

有點(diǎn)看不懂啊，沒(méi)抄錯(cuò)吧 版主
   

旋轉(zhuǎn)小馬

跟著大神學(xué)代碼~~~回復(fù) 2# jason680


   

flw

尼瑪，不知道怎么觸發(fā)了論壇的隱藏功能，
我編輯了還是改不過(guò)來(lái)。

看這里吧：

http://www.newsmth.net/bbscon.php?bid=226&id=61643

jason680

@flw @45177659

  這個(gè)就是捕獲的意思。

@F = split $R, $S 類似于下面的代碼（不論帶不帶括號(hào)、哪里帶括號(hào)、帶幾個(gè)括號(hào)）：

while( @s = $S =~ $R ){
    push @F, $`;
    push @F, @s;
    $S = $';
}

push @F, $S;

45177659

回復(fù) 8# jason680

有理有據(jù)，令人信服！:wink: