perl 元字符

.	任意一个字符\n除外
+	重复>=1次
*	重复>=0次
?	重复<=1次
$	行尾
[]	字符类，匹配其中任意一个
()	组，在组中^$表行首行尾
\d	[0-9]
\D	[^0-9]
\s	空白字符
\S	[^\s]
\w	[0-9a-zA-Z]
\W	[^\w]
\b	单词边界
//i	case-insensitive
//g	多次匹配，函数pos记录其位置
s///	replace
s///r	返回替代结果但并不修改原来的值$_或用=~绑定的值
s///e	指明计算后的结果替代匹配的字符串