Perl 单词边界

单词边界:

\b匹配单词边界,就是位于单词(\w)和非单词字符(\W)之间的零宽度的地方。

就是单词前后必须跟非单词字符

[oracle@jhoa big]$ cat 11.pl 
#$var = "The Great Fred";
$var = "Fred erick the Great";
if ($var =~/\bFred\b/){print "$var\n"};


[oracle@jhoa big]$ perl 11.pl 
Fred erick the Great

[oracle@jhoa big]$ cat 11.pl 
#$var = "The Great Fred";
$var = "aFred erick the Great";
if ($var =~/\bFred\b/){print "$var\n"};
[oracle@jhoa big]$ perl 11.pl 
[oracle@jhoa big]$ 

Fred前面出现单词字符,匹配不上

[oracle@jhoa big]$ cat 11.pl 
#$var = "The Great Fred";
$var = "Freda erick the Great";
if ($var =~/\bFred\b/){print "$var\n"};
[oracle@jhoa big]$ perl 11.pl 
[oracle@jhoa big]$

Fred后面出现单词字符匹配不上 

[oracle@jhoa big]$ cat 11.pl 
#$var = "The Great Fred";
$var = "!Fred erick the Great";
if ($var =~/\bFred\b/){print "$var\n"};
[oracle@jhoa big]$ perl 11.pl 
!Fred erick the Great
[oracle@jhoa big]$

单词前面出现非单词字符,可以匹配

[oracle@jhoa big]$ cat 11.pl 
#$var = "The Great Fred";
$var = "Fred! erick the Great";
if ($var =~/\bFred\b/){print "$var\n"};
[oracle@jhoa big]$ perl 11.pl 
Fred! erick the Great
[oracle@jhoa big]$

单词后面出现非单词字符,可以匹配

相关文章

1. 如何去重 #!/usr/bin/perl use strict; my %hash; while(...
最近写了一个perl脚本,实现的功能是将表格中其中两列的数据...
表的数据字典格式如下:如果手动写MySQL建表语句,确认麻烦,...
巡检类工作经常会出具日报,最近在原有日报的基础上又新增了...
在实际生产环境中,常常需要从后台日志中截取报文,报文的形...
最近写的一个perl程序,通过关键词匹配统计其出现的频率,让...