温馨提示×

温馨提示×

您好,登录后才能下订单哦!

密码登录×
登录注册×
其他方式登录
点击 登录注册 即表示同意《亿速云用户服务条款》

Linux常用命令perl怎么用

发布时间:2022-02-17 10:33:46 来源:亿速云 阅读:180 作者:小新 栏目:开发技术

小编给大家分享一下Linux常用命令perl怎么用,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!

Linux常用命令perl命令是perl语言解释器,负责解释执行perl语言程序法。

Linux常用命令perl怎么用

命令格式

 用法:perl [选项] [参数]

常用选项

 -o 以八进制数形式指定输入记录的分隔符(也保存在perl中的特殊变量$/中)
 -a 当和-n或者-p一起使用时启动自动拆分模式.这种模式可以拆分输入的行,并把它们放置在名为@F的专门数组中
 -c 使perl检查脚本的语法,然后退出
 -C 使perl能够在目标系统中使用原始的宽字符API.
 -d 在perl调试程序下运行脚本
 -e 使用命令行,
 -F 如果使用了-a,该参数可以用来指定所拆分的模式
 -h 打印出所有选项的汇总
 -i 指出被结构处理的文本
 -I 使perl为模块搜索目录
 -l 添加行结束处理,当和-n与-p开关一起使用,这个开关能自动把$/从输入数据中删除,并把$\(输出记录分隔符)设置为octnum,这样打印语句就可以使用该分隔符了.
 -m[-]module 在执行脚本前,把指定模块包含在脚本中
 -n 让perl在脚本中试用while()循环
 -p 让perl把下面循环添加到脚本中:
 -P perl编译之前,通过C预设处理程序来运行自己的脚本
 -s 在命令行中允许要进行开关解析
 -S 让perl试用PATH环境变量来搜索脚本
 -T 强制打开错误检查
 -u 在编译了脚本后,导致perl清楚内核
 -U 允许perl进行不安全的操作,如删除目录等
 -v  打印出perl的版本及包的级别
 -V:name 打印出指定的配置变量的汇总
 -w 打印出警告信息
 -W 无论no warnings或$^W的状态是什么,都启动警告信息
 -x directory 通知perl脚本嵌入到消息中,文本不会被处理,知道第一行代码以#!开头并包含了字符"perl"
 -X 无论use warnings或$^W的状态是什么,都禁止警告信息
 – 可选, 表示使用的这些开关的结束位置

参考示例

解析Perl程序

 [deng@localhost tmp]$ perl test.sh
 hello world
 [deng@localhost tmp]$

其它用法

 # perl -p -i.bak -e 's/\bfoo\b/bar/g' *.c    #将所有C程序中的foo替换成bar,旧文件备份成.bak
 
 # perl -i.bak -pe 's/(\d+)/ 1 + $1 /ge' file1 file2 …    #将每个文件中出现的数值都加一
 
 # perl -pie 's/\r\n/\n/g' file   #将换行符\r\n替换成\n
 
 # perl -pie 's/\n/\r\n/g' file  #将换行符\n替换成\r\n
 
 # perl -lane 'print "@F[0..4] $F[6]"' file   #显示字段0-4和字段6,字段的分隔符是空格
 
 # perl -F: -lane 'print "@F[0..4]\n"' /etc/passwd     #字段分隔符不是空格而是冒号
 
 # perl -ne 'print if /^START$/ .. /^END$/' file   #显示START和END之间的部分
 
 # perl -ne 'print unless /^START$/ .. /^END$/' file   #不显示START和END之间的部分
 
 # perl -pe 'exit if $. > 50′ file    #显示开头50行
 
 # perl -ne 'print unless 1 .. 10′ file   #不显示开头10行
 
 # perl -ne 'print if 15 .. 17′ file  #显示15行到17行
 
 # perl -lne 'print substr($_, 0, 80) = ""' file  #每行取前80个字符
 
 # perl -lne 'print substr($_, 10) = ""' file  #每行丢弃前10个字符
 
 # perl -ne 'print if /comment/' duptext     #查找comment字符串
 
 # perl -ne 'print unless /comment/' duptext    #查找不含comment字符串的行
 
 # perl -ne 'print if /comment/ || /apple/' duptext    #查找包含comment或apple的行
 
 # perl -lane 'print $F[4] + $F[-2]'    #计算字段4和倒数第二字段之和
 
 # perl -e 'print sort ' file   #文件按行排序
 
 # perl -00 -e 'print sort ' file   #文件按段落排序
 
 # perl -0777 -e 'print sort ' file1 file2   #多个文件按文件内容排序,并返回合并后的文件
 
 # perl -e 'print reverse ' file1      #文件按行反转
 
 # perl -ne 'printf "%x\n",$_'     #10进制转16进制
 
 # perl -ne 'printf "%o\n",$_'    #10进制转8进制
 
 # perl -ne 'print hex($_)."\n"'   #16进制转10进制
 
 # perl -ne 'print oct($_)."\n"'   #8进制转10进制
 
 # perl -ne 'print eval($_)."\n"'   #简易计算器

以上是“Linux常用命令perl怎么用”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注亿速云行业资讯频道!

向AI问一下细节

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

AI