A. 原文替换
perl -p -i.bak -e "s/源串/目标串/g" <文件名>
原文会备份为.bak后缀的文件
B. 正则分组提取
echo "tom and dic" | perl -n -e ' @w = /(tom).*(dic)/; print "$w[0] & $w[1]"'
打印 “tom & dic”
注：-p 打印满足正则的字串到输出
-n 不打印串到输出，只打印程序print之类的语句
C. 字符串分割
-a 开启自动分割，分割的结果保存在@F
-F/pattern/ 和-a配合使用，pattern声明分隔符