使用更精确的空白字符组

1. 水平空白字符

从Perl5.10开始，我们可以用\h字符组匹配任意水平空白字符

大写\H，它会匹配所有水平空白意外的任意字符。

use 5.010;
#所有连续的水平空白字符都将被替换为单个空格，而换行符被保留下来
$string =~ s/\h+/ /g;

 

2.垂直空白字符

垂直空白字符可以分为回车符，换行符，进纸符，垂直制表符，以及unicode的行分割符和段分隔符。

use 5.010;
#是否为多行文本
if ($string =~ m/\v/) {
  say 'Found a multiline string' ;
}

大写的\V ，匹配垂直空白字符以外的任意字符。

 

3.行终止符

Perl5.010 特意引入的\R字符数组，以更简洁的方式表示。

use 5.010;
$string =~ s/\R/\n/g ;

 

4. 非换行符

Perl 5.12 引入了非换行符字符组\N

use 5.012;

if ($string =~ m/(]N+)/) {
}