这篇文章主要给大家介绍了关于Perl学习教程之单行命令的相关资料,文中给出了详细的示例代码供大家参考学习,对大家学习或者使用perl具有一定的参考学习价值,需要的朋友可以参考借鉴,下面来一起看看吧。

前言

本文主要给大家介绍了关于Perl单行命令的相关内容,分享出来供大家参考学习,下面话不多说了,来一起看看详细的介绍吧。

与One-Liner相关的perl参数

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

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

以上为简介版,下面这张图可以算是完整版

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

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

2、perl -e为必须要写的参数

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

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

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

5、如果需要处理tab分割的文件的每一行内容,那么perl -alne参数几乎可以说是必备的,例如while(<>){chomp;@F=split /\s+/,$_;print "$F[0]\n"}相当于

perl -alne 'print $F[0]'

6、perl单行命令脚本里的变量都不需要预先声明,如想打印出每空行,并且每行以行数开头

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

7、perl单行命令有时优于sed/grep等shell命令是由于其优秀的正则匹配,通常简单的匹配可以如:匹配上的行号,模仿grep -c的功能:

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

8、perl单行命令可以使用perl的模块,如使用sum函数的模块:

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

9、perl也可以像awk一样使用END命令,如打印出文件中总单词个数

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

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

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

11、perl单行命令可以说是将perl的简洁用到了极致,如打印出匹配上的行:

perl -ne '/regex/ && print'

12、perl单行命令能像perl一样灵活的使用则正表达式

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命令环境~~~~

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

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,如果有疑问大家可以留言交流,谢谢大家对爱安网的支持。

最新资讯
茅台双11成交金额过亿 旗舰店紧急补货

茅台双11成交金额过亿

天猫双11当天成交金额已经过亿。茅台官方旗舰店紧急追
FF法拉第未来员工网上筹款 帮助自己渡过难关

FF法拉第未来员工网上

根据项目介绍,由于法拉第未来的资金危机,公司采取了裁员
人民日报海外版:互利共赢是理解双11的核心词

人民日报海外版:互利共

“双11”扇动的消费翅膀,正在形成日益显著的全球效应。
小米投资者的十字路口:危险的“二季度跳跃”

小米投资者的十字路口

上市前号称价值千亿美金的小米,IPO之后的上涨仅仅维持
区块链泡沫覆灭众生相:币圈遇熊市,背后资本转向

区块链泡沫覆灭众生相

熊市来临,老币民们热情退却,面临银行卡冻结、封vpn(虚拟
双11刚过0点改不了收货地址 网友硬着头皮一通乱寄

双11刚过0点改不了收

0点付款的时候,为什么改不了送货地址?!
最新文章
Perl 批量添加Copyright版权信息

Perl 批量添加Copyrig

对所有输入文件,如果没有版权信息则加上版权信息,否则什
Perl字符串处理函数大全

Perl字符串处理函数大

本文重点讨论Perl字符串处理函数的用法,每种函数都有
Perl中常见符号与操作

Perl中常见符号与操作

这篇文章主要介绍了Perl中常见符号与操作,需要的朋友
Perl学习教程之单行命令详解

Perl学习教程之单行命

这篇文章主要给大家介绍了关于Perl学习教程之单行命令
使用Perl生成随机密码

使用Perl生成随机密码

本文给大家分享的是使用perl生成随机密码的方法示例,而
perl uc,lc,ucfirst,lcfirst大小写转换函数

perl uc,lc,ucfirst,l

这篇文章主要介绍了perl 大小写字母转换函数,需要的朋