收藏本站 收藏本站
积木网首页 - 软件测试 - 常用手册 - 站长工具 - 技术社区
首页 > perl > 正文

首页 - PHP - 数据库 - 操作系统 - 游戏开发 - JS - Android - MySql - Redis - MongoDB - Win8 - Shell编程 - DOS命令 - jQuery - CSS样式 - Python - Perl

Access - Oracle - DB2 - SQLServer - MsSql2008 - MsSql2005 - Sqlite - PostgreSQL - node.js - extjs - JavaScript vbs - Powershell - Ruby

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

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

总结

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

Perl中常见符号与操作
注释:1.单行:#print2.多行:=pod….=cut查询perl相关:Perldocperlvar($a,$$,$...)Perldocperfunc(sort…)Perldocperl查看perldoc文章列表Perldoc?q正则表达式Perldoc?f函数名Perld

Perl中的特殊符号介绍
$_俗称perl的老地方,当你的程序中未告知使用哪个参数或者变量时,perl就会自动使用$_中的值,比如for(1..10){print;}这里print没有指定参数,所以它就会使

Perl中的符号 ->;、=>; 和 :: 分别表示什么意思?
Whatdothe-,=and::symbolsmeanThe-isthe"infixdereferenceoperator".Inotherwordsitisthemeansbywhichonecallsasubwithapassbyreference(amongotherthingsyoucandowith-).Asstatedabovemostthingsincallstoperl/Tkro

本周排行

更新排行

强悍的草根IT技术社区,这里应该有您想要的! 友情链接:b2b电子商务
Copyright © 2010 Gimoo.Net. All Rights Rreserved  京ICP备05050695号