统计alert日志ora错误数目并排行的perl脚本
写了一个perl脚本统计数据库alert日志中各种ora错误出现的次数,并按出现的次数排行:########################################################################统计alert日志文件中的ora错误数目并按数目排行###...
perl之命名空间
疑问:在File::Find模块中,变量名中的双冒号(::)表示什么?它是否与 $File::Find::dir中的相同?解答:Perl模块能够为变量名建立一些备用区域,称为名空间,这样,模块的全局变量名与你自己的全局变量名就不会混...
perl尖括号运算符(<>)
1) 如果尖括号中间是文件句柄,尖括号运算符允许你读取文件句柄,比如 <STDIN>。 2) 如果尖括号中间是搜索模式,尖括号运算符能返回与该模式匹配的文件列表,这称为一个glob,比如< *.bat>。 3)...
Perl常用调试命令
(1) 开启调试模式Perl的-d开关可使Perl以调试方式启动运行:#perl –d functest.pl (2) 常用调试命令h[db_cmd] &nbs...
perl可移植性规则
perl可移植性规则 • 始终使警告特性处于打开状态,并使用 use strict命令。这样,就可以确保你的代码能够用不同版本的Perl来运行,并且不会出现明显的错误。 • 始终都要检查来自系统请求...
crontab失败的解决过程
1.问题描述:在使用crontab定时执行发布包sql脚本解析工作时,出现了一个奇怪的问题,脚本执行到生成release_xxxx.tmp文件就终止执行了,且release_xxxx.tmp文件是空的。但是以同样的方式手动执行dbmisProject.sh脚...
perl之use strict
命令use strict意味着所有变量必须用my来声明,裸单词必须用引号括起来。 use strict语句实际上可以称为编译器命令。它能够告诉 Perl,给下列情况做上指向 当前代码块或文件中的运行期错误的标志:&n...
Perl正则表达式匹配之最大数量匹配规则
perl会进行第一次最大字符数量的匹配。你的正则表达式可能迅速找到一个匹配的模式,然后设法尽可能延伸能够匹配的字符范围。正则表达式是“贪婪的”,也就是说,它会尽可能多地寻找能够匹配的字符。 例如 /fi...
Perl中对<STDIN>进行chomp处理的重要性
不对<STDIN>进行chomp处理导致结果错误:#!/usr/bin/perl –w $reg = <STDIN>;$_ = “I love you”;if(/$reg/){ print ‘$_ contains what you input’;}在上面这个程序中,由于没有对<STDIN>...
PERL学习笔记(一)
第1学时 perl入门1. linux上获取perl帮助的命令(1) 查看函数若要搜索手册,查找某个函数名,可以运行带有 -tf开关的perldoc实用程序。下面这个例子用于查找Perl的print函数的手册页:$ perldoc -tf print(...