本文和大家重点讨论一下Perl正则表达式的相关内容,在学习Perl语言的过程中,Perl正则表达式问题经常会遇到,这里向大家介绍一下,希望通过本文的学习你对Perl正则表达式的概念有一定的认识。
Perl正则表达式
更多的时候,我们可能不能使用默认变量来进行Perl正则表达式的匹配,所以Perl提供了一个专门的运算符“=~”,它专门用来进行Perl正则表达式的匹配。忽略大小写
- #!/usr/bin/Perl-w
- $str="helloPerlworld!\n";
- if($str=~/Perl/i){###忽略大小写,匹配$str中是否存在Perl字符;
- print"$str";
- }
Perl中的Perl正则表达式还可以使用变量来动态地改变匹配的模式,如:
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:$_";
【编辑推荐】