您好,登錄后才能下訂單哦!
Perl中如何使用正則表達(dá)式,針對(duì)這個(gè)問題,這篇文章詳細(xì)介紹了相對(duì)應(yīng)的分析和解答,希望可以幫助更多想解決這個(gè)問題的小伙伴找到更簡(jiǎn)單易行的方法。
Perl正則表達(dá)式
更多的時(shí)候,我們可能不能使用默認(rèn)變量來進(jìn)行Perl正則表達(dá)式的匹配,所以Perl提供了一個(gè)專門的運(yùn)算符“=~”,它專門用來進(jìn)行Perl正則表達(dá)式的匹配。忽略大小寫
#!/usr/bin/Perl-w $str="helloPerlworld!\n"; if($str=~/Perl/i){###忽略大小寫,匹配$str中是否存在Perl字符; print"$str"; }
Perl中的Perl正則表達(dá)式還可以使用變量來動(dòng)態(tài)地改變匹配的模式,如:
1、字符串匹配
[root@test-linuxtmp]#catp.pl #!/usr/bin/Perl-w $str="helloPerlprogram!\n"; print"youinputis:\n"; $input=<STDIN>; chomp($input); if($str=~/$input/i){ print"haha,find$str\n"; } [root@test-linuxtmp]#./p.pl youinputis: hel haha,findhelloPerlprogram! [root@test-linuxtmp]#
2、字符串替換
[root@test-linuxtmp]#./pap.pl oldstringis:helloPerlWorld! newstringis:helloPerlNewWorld! [root@test-linuxtmp]# [root@test-linuxtmp]#catpap.pl #!/usr/bin/Perl-w $_="helloPerlWorld!\n"; print"oldstringis:$_"; s/Perl/PerlNew/g; print"newstringis:$_";
關(guān)于Perl中如何使用正則表達(dá)式問題的解答就分享到這里了,希望以上內(nèi)容可以對(duì)大家有一定的幫助,如果你還有很多疑惑沒有解開,可以關(guān)注億速云行業(yè)資訊頻道了解更多相關(guān)知識(shí)。
免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。