[转帖] Linux 下面 perl 命令的简介

https://www.jb51.net/article/123326.htm

感受挺好的 改天须要仔细学习一下. 

 

前言

本文主要给你们介绍了关于Perl单行命令的相关内容，分享出来供你们参考学习，下面话很少说了，来一块儿看看详细的介绍吧。

与One-Liner相关的perl参数

• -a 自动分隔模式，用空格分隔$并保存在@F中，也就是@F=split //, $
• -F 指定-a的分隔符
• -l 对输入的内容进行自动chomp，对输出的内容自动加换行符
• -n 至关于while(<>)
• -e 执行命令，也就是脚本
• -p 自动循环+输出，也就是while(<>){命令（脚本）; print;}

记住以上几点参数，几乎能够开始使用perl来编写one line命令了

以上为简介版，下面这张图能够算是完整版

 

根据下面的例子来理解下perl one line

一、基本格式：perl -参数 ‘命令' 输入文件

二、perl -e为必需要写的参数

三、perl -pe 可用于读取文件每行，并按照给定的命令进行处理，最后输出；如将文件1.txt中的aaa替换为AAA

?

1	perl -pe 's/aaa/AAA/g' 1.txt

四、perl -l参数几乎能够跟n搭配代替perl常常用的while(<>){chomp;}语法

五、若是须要处理tab分割的文件的每一行内容，那么perl -alne参数几乎能够说是必备的，例如while(<>){chomp;@F=split /\s+/,$_;print "$F[0]\n"}至关于

?

1	perl -alne 'print $F[0]'

六、perl单行命令脚本里的变量都不须要预先声明，如想打印出每空行，而且每行以行数开头

?

1	perl - ne 'print ++$a." $_" if /./'

七、perl单行命令有时优于sed/grep等shell命令是因为其优秀的正则匹配，一般简单的匹配能够如：匹配上的行号，模仿grep -c的功能：

?

1	perl -lne '$a++ if /regex/; END {print $a+0}'

八、perl单行命令可使用perl的模块，如使用sum函数的模块：

?

1	perl -MList::Util= sum -alne 'print sum @F'

九、perl也能够像awk同样使用END命令，如打印出文件中总单词个数

?

1	perl -alne '$t += @F; END { print $t}'

十、perl也可使用map{}等函数，如打印出匹配上的单词的总个数

?

1	perl -alne 'map { /regex/ && $t++ } @F; END { print $t }'

十一、perl单行命令能够说是将perl的简洁用到了极致，如打印出匹配上的行：

?

1	perl - ne '/regex/ && print'

十二、perl单行命令能像perl同样灵活的使用则正表达式

?

1	perl - ne 'print if /^\d+$/'

以上例子均出自于http://www.catonmat.net/blog/perl-one-liners-explained-part-one/

使用perl来处理数据的咱们，会一点Perl one line能够有效的减小编写重复命令的时间，尤为是那些就用1-2次就不会用的脚本，尤为在window系统下不方便使用shell命令的时候。

PS.固然在windows系统下也能够借用git模拟Unix命令环境~~~~

总而言之，蛮适合学习下，多用用

总结

以上就是这篇文章的所有内容了，但愿本文的内容对你们的学习或者工做具备必定的参考学习价值，若是有疑问你们能够留言交流，谢谢你们对脚本之家的支持。