这篇文章主要给大家介绍了关于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命令环境~~~~

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

总结

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

最新资讯
刘强东为抗疫情发声:我们送的不是货,是温暖和希望

刘强东为抗疫情发声:我

最近持续的新型冠状病毒肺炎疫情牵动着无数人的心,京东
阿里巴巴等百家企业承诺:防疫、民生用品价格不涨

阿里巴巴等百家企业承

国家市场监管总局29日召开视频会议启动了“保价格、保
搜狗及搜狐集团联合捐赠2000万元物资用于疫情防控

搜狗及搜狐集团联合捐

搜狗及搜狐集团联合出资2000万元采购N95(9312/1860)防护
欧盟宣布5G安全指引 不禁止华为参与建设5G网络

欧盟宣布5G安全指引

欧委会29日发布了欧盟5G安全指引,目的在于降低5G网络带
陌陌捐资1000万 首笔500万助力钟南山医学基金会

陌陌捐资1000万 首笔5

陌陌科技今天宣布,设立抗击疫情科研公益金,将通过中国福
小米向武汉再捐款1000万元 物资捐赠累计已超300万元

小米向武汉再捐款1000

小米集团向武汉市慈善总会捐赠1000万元人民币并已汇出
最新文章
将Perl5代码迁移到Perl6上的解决方案

将Perl5代码迁移到Per

今天小编就为大家分享一篇关于将Perl5代码迁移到Perl6
Perl 批量添加Copyright版权信息

Perl 批量添加Copyrig

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

Perl字符串处理函数大

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

Perl中常见符号与操作

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

Perl学习教程之单行命

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

使用Perl生成随机密码

本文给大家分享的是使用perl生成随机密码的方法示例,而