Perl正则表达式用法浅析

本文和大家重点讨论一下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:$_";  
  
  
  
 
 
 
 

 【编辑推荐】

1. Perl正则表达式内容盘点
2. 解析Perl正则表达式的形式、模式和原则
3. 解析两大Perl标量的操作符
4. Perl正则表达式的三种形式
5. 全面认识Perl正则表达式使用