#
perl readdir函数详解2013年12月30日 Perl基础 共 763字 字号 小 中 大 暂无评论&
#!/usr/bin/perl -w #################################################################
在搭建Elasticsearch数据库的过程中，首先使用了其推荐的Logstash工具导入数据，但是用起来非常不顺手，所以想用Perl擅长的正则表达式对数据进行过滤分类，然后导入Elasticsear
在Perl语言编程一书中学习到了一种直接读取特定格式文件的方法，非常简洁，代码如下：while (){ print $_." "; }
perl 做为就像胶水一样，将各种语言都黏贴在一起它轻巧方便，非常适合写小型的脚本(我暂时也没有写超过1000行的perl代码我最欣赏的是它强大的正则运算能力，尤其其中的“捕获”操作，实在是太厉害了！
今天要监控一个服务的进程___xl2tpd;该服务有几个IP就会有几个进程； 本来是想利用nagios的check_nrpe插件取值，然后判断报警，脚本写好了，本地测试正常，可是部署上去发现每次都取得
某程序员退休后决定练习书法，于是重金购买文房四宝。一日，饭后突生雅兴，一番研墨拟纸，并点上上好檀香。定神片刻，泼墨挥毫，郑重地写下一行字：hello world！hello world, 通常是程序员
copy#!/usr/bin/perl -w #######################################################
perl允许你用任何标点符号作为定界符。常用的写法有：#!usr/bin/perl -wuse strict;=podmy @arr = ("fred", "barney
安装postgresql后，普通用户执行psql报错：'''Can't locate strict.pm: /usr/local/lib/x86_64-linux-gnu/perl/5.22.1/
