perl学习笔记(8)

前端之家收集整理的这篇文章主要介绍了perl学习笔记(8)前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

^一行的开头 $一行的结尾 例如/^$/匹配空行。
用\转义特殊字符。
//i,后面跟个i不区分大小写。
//g,后面跟个g匹配全部。没有g只匹配一次。
s///,前面跟个s做替换。
grep对列表中的元素逐一进行模式匹配操作。

练习(f81.pl):

 
 @H_301_16@
  • #!/usr/bin/perl -w  
  • $pat=<STDIN>;  
  • chomp $pat;  
  • $a="The phrase that pays";  
  • if ($a=~/$pat/i){  
  •         print "\$_ contains the pattern $pat \n";  
  • }  
  • $a=~s/phrase/$pat/;  
  • print qq($a\n);  
  •  
  • @a_m=grep /A/i,("1 aaa","2 hello world!","3 abc","4 a b c");  
  • print qq(@a_m\n);  
  •  
  • @bb=("1a","bb a","aaa board");  
  • @a_m=grep s/A/X/ig,@bb;  
  • print qq(\@a_m=@a_m\n);  
  • print qq(\@bb=@bb\n);  
  • $ perl f81.pl
    www
    The www that pays
    1 aaa 3 abc 4 a b c
    @a_m=1X bb X XXX Boxrd
    @bb=1X bb X XXX Boxrd
     

    正则表达式不好记忆,理解起来也挺费脑子,这就决定了贡献正则表达式代码只能是少数人。在具体实践中,去搜索别人已经写好的正则表达式,拿过来测一测,改一改自己用是比较好的方式。自己有好的正则表达式代码也不妨贡献出来。如果是自己写正则表达式,建议简单用用就好。另外就是如果正则表达式比较复杂,最好有注释,别让后面维护代码的人骂你。

    这个页面上介绍了几个不错的正则表达式工具(我个人比较欣赏RegexBuddy):
    http://apps.hi.baidu.com/share/detail/20369196

    下面这本书是公认的好书:
    精通正则表达式(第3版)中文版.(美)Jeffrey.E.F.Friedl
    英文书名叫:Mastering Regular Expressions

    关于正则表达式,就学习到这里吧。

    猜你在找的Perl相关文章