婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > 一個perl擴展正則表達式代碼分析

一個perl擴展正則表達式代碼分析

熱門標簽:惠州龍門400電話要怎么申請 智能機器人電銷神器 外呼電信系統 河南虛擬外呼系統公司 熱門電銷機器人 上海企業外呼系統 okcc外呼系統怎么調速度 萬利達百貨商場地圖標注 電話機器人哪里有賣
復制代碼 代碼如下:

my $ip = "192.168.0.1|192.168.0.2|192.168.0.1";
if ( $ip =~ /
    ^
    (?:
        ((?:\d{1,3}\.){3}\d{1,3})
        (?=
            (?:
                \|(?!\1)(?1)
            )*
            \z
        )
        \|
    )*
    (?1)
    $
    /x ) {
    print "match\n";
}

根據perlre文檔的說明,一點一點解釋。 首先是/x,用這個來去除regex里的空格,不然的話寫在一行太難看懂了; 然后是^,表示從最開頭開始; 然后是(?:,這個表示本括號不記入反向引用$中; 然后是((?:\d{1,3}.){3}\d{1,3}),同樣里面一個(?:,也就是說這一行匹配一個ip,并計為$1; 然后是(?=,這個表示在上面那行ip的正則后面必須出現符合本括號定義,同樣也不計入$(術語叫”零寬肯定前向斷言”是吧?); 然后一個隔開ip的|; 然后是(?!,這個表示本括號內的東西絕對不能出現,同樣也不計入$(術語叫”零寬否定前向斷言”是吧?); 然后是\1,這個就是前面捕獲的$1,跟上行解釋的斷言合在一起,就是|后面不能有和前面匹配的ip重復; 然后是(?1,這個表示前面捕獲$1的正則表達式,也就是不重復ip的情況下,繼續捕獲新ip; 然后是),這個)閉合到|前面的(?:,也就是說|ip可以重復多個; 然后是\z,這個是字符串邊界,相當于單行里$的作用,在本例中可以互換,用在這里,就是為了讓(?!\1)的檢查一直執行到最后; 然后是),閉合(?=; 然后是|和),這里閉合到^(,表示符合不重復ip條件的ip|格式不斷正則匹配; 然后是(?1)$,定義最后一個ip,使用和$1相同的正則,也就是字符串至少要有一個ip。 OK,解釋完畢。其實,從后往前看,反而清晰一些~~ 另:perlre中在(??{CODE})段的表述中有如下一段話“In perl 5.12.x and earlier, because the regex engine was not re-entrant, delayed code could not safely invoke the regex engine either directly with “m//” or “s///”), or indirectly with functions such as “split”.”,而(?R)和(??{CODE})做的是類似而簡單的任務,所以如果linux發行版里帶的perl版本不夠高的話,這里就不能用(?1)的簡單寫法,需要自己再寫一遍了。可以這么判斷:
復制代碼 代碼如下:

my $re = $^V lt v5.14 ? '(?:\d{1,3}\.?){4}' : '(?1)';
my $ip = "192.168.0.1|192.168.0.2|192.168.0.3|192.168.0.4|192.168.0.5";
if ( $ip =~ m/
    ^
    (?:
        ((?:\d{1,3}\.?){4})
        (?=
            (?:
                \|(?!\1)$re
            )*
            \z
        )
        \|
    )*
    $re
    $
    /x ) {
    print "$1 match\n";
}
您可能感興趣的文章:
  • PERL 正則表達式詳細說明
  • Perl中的正則表達式介紹
  • 關于Perl里面正則表達式規范
  • POSIX 風格和兼容 Perl 風格兩種正則表達式主要函數的類比(preg_match, preg_replace, ereg, ereg_replace)
  • 解析posix與perl標準的正則表達式區別
  • 在PHP中使用與Perl兼容的正則表達式
  • 有關perl正則表達式的一些雜項
  • PHP中基于perl的正則表達式處理函數
  • 強大的Perl正則表達式實例詳解

標簽:秦皇島 周口 綿陽 綏化 百色 淮安 合肥 周口

巨人網絡通訊聲明:本文標題《一個perl擴展正則表達式代碼分析》,本文關鍵詞  一個,perl,擴展,正則,表達式,;如發現本文內容存在版權問題,煩請提供相關信息告之我們,我們將及時溝通與處理。本站內容系統采集于網絡,涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《一個perl擴展正則表達式代碼分析》相關的同類信息!
  • 本頁收集關于一個perl擴展正則表達式代碼分析的相關信息資訊供網民參考!
  • 推薦文章
    主站蜘蛛池模板: 襄城县| 武宁县| 棋牌| 丰县| 美姑县| 即墨市| 乌什县| 积石山| 青川县| 铜山县| 旬阳县| 策勒县| 壤塘县| 河西区| 长乐市| 柳州市| 密山市| 时尚| 扶绥县| 永春县| 芦山县| 郁南县| 常山县| 边坝县| 五寨县| 武强县| 星座| 沧州市| 七台河市| 民丰县| 宁明县| 静安区| 青海省| 遂川县| 顺平县| 沅江市| 珲春市| 喀什市| 尼勒克县| 榕江县| 苍溪县|