Perl中删除或替换字符串中特殊字符（如空格）的方法

这篇博文很简单，只是因为我对Perl语言实在不熟悉，所以这里简单记录一下。

今天在写实验代码的时候，突然有了这样一个需求，就是用Perl将包含换行（或回车）的字符串变成一行，并且每一行用空格分隔，经过搜索，网友介绍了这样的写法：

$string=~ s/[\n\r]/ /g;

其实也很好理解，这里把网友的解释摘抄过来：=~ s/A/B/g  可以起到替换的作用，就是将内容A替换成内容B，后面的g是全局的意思，也就“全部替换”的意思。

[AB]意为A或者B两种情况。

Perl的转义字符和C很相似：

\n 换行 
\r 回车 
\t 水平制表符(Tab) 
\b 退格 
\e Esc (ASCII编码的转义字符) 
\\ 反斜线 
\" 双引号 

所以上面这种写法就很好理解了。

另外在Perl中删除字符串前后空格的方法：

$string =~ s/^\s+//;
$string =~ s/\s+$//;

再举两个例子：

$str =~ s/\s\s+//g;  #-----全局替换2个以上的空格为空

$AAA =~ s/[\n\r]*//g

[ AB ]表示出现在中括号的是任意的其中一个，\n和\r是换行符 ，[\n\r]*中的*号表示0个或以上
总结起来，上面这条语句的含义是：将$AAA中的所有的换行符全部替换为空，也就是将所有换行去掉。

另外转载一下网友介绍的Perl正则表达式匹配规则：

++++++++++++++++++++++++++++++++++++++++++

对于一些常用的匹配方式有时候不需要去编写复杂的匹配模式，正则表达式的\w \s \d \b与量词的组合能帮我们解决很多事情。
\w 匹配一个字母、数字或下划线字符，相当于[a-zA-Z_0-9]
\s 匹配一个空字符
\d 匹配一个数字
\b 匹配单词的首尾
这些修饰符的大写形式为它们匹配的相反情况。


这样我们要匹配连续的字符串可以用 \w+    匹配一个单词用 \b\w+\b    匹配空白用\s+
匹配所有字符用[\d\D]，匹配除换行符之外的所有字符用“.”