位置: 编程技术 - 正文

Perl中捕获警告信息、异常信息并写入日志详解(perl调用perl脚本)

编辑:rootadmin

推荐整理分享Perl中捕获警告信息、异常信息并写入日志详解(perl调用perl脚本),希望有所帮助,仅作参考,欢迎阅读内容。

文章相关热门搜索词:perl脚本执行命令参数,调用perl脚本,perl 获取参数,perl调用perl脚本,调用perl脚本,perl获取命令行参数,调用perl脚本,perl获取命令行参数,内容如对您有帮助,希望把文章链接给更多的朋友!

虽然建议在每个Perl脚本和模块中开启警告,可是你又不想用户看到Perl发出的警告。

一方面你想在代码前面使用use warnings作为你的安全网,另一方面,通常警告会出现在屏幕上。多数情况下,客户不知道如何处理这些警告。如果幸运的话这些警告仅仅让客户惊讶一下,当然,不幸的是他们尝试着去修复它们... (这里说的不是Perl程序员。)

第三方面,你或许想要保存这些警告供之后分析。

此外,在很多地方还有很多Perl脚本和应用程序没有使用use warnings也没有在#!行中使用-w。加上了use warnings就可能会产生大量的警告。

长远来看,当然是要消除这些警告,但是短期来说呢?

即便是长期计划,你也不能写出完全没有BUG的代码,你也不能确保应用将来永远不会打印出警告信息。

你能么?

你可以在警告打印到屏幕之前捕获它们。

信号Perl有一个叫做%SIG的内建hash表,其中的键是操作系统信号的名字。对应的值是函数(大多数是函数引用),这些函数会在特定的信号触发时被调用。

除了系统提供的标准信号以外,Perl还添加了两个内部“信号”。其中一个是<h__warn__< span="">,它在每次代码调用warn()函数的时候触发。另外一个是__DIE__,它在每次调用die()时触发。

在本文中,我们会看到这些是怎样影响警告信息的。

匿名函数

sub { }是匿名函数,也就是一个只有函数体而没有名字的函数。(在这个例子中函数体也是空的,但是我希望你能明白我的意思。)

捕获警告--不处理

如果添加如下代码:

这实际上表示每次程序的某个地方产生了警告信息时,不做任何处理。基本上,这会隐藏所有的警告。

捕获警告--并转换成异常

You could also write: 你也可以写成:这样会在每次产生警告的时候调用die(),也就是把每个警告转换成异常。

如果你想在异常中包含警告信息,可以这么写:

Perl中捕获警告信息、异常信息并写入日志详解(perl调用perl脚本)

实际的警告信息会作为唯一的参数传递给匿名函数。

捕获警告--并写入日志你可能想在中间做些其他事情:

过滤嘈杂的警告信息,留待后来分析:这里我们假设logger()是你实现的写日志函数。

写日志

假设你的应用程序已经有日志机制。如果没有的话,最好加上。即便你不能添加,你也需要操作系统的内建日志机制。例如Linux的syslog,MS Windows的Event Logger,其它操作系统也有它们内部的日志机制。

在本文的例子里,我们使用一个自制logger()函数来代表这个想法。

捕获并写日志的完整例子

上面的代码会在log.txt文件中添加下面一行:变量$counter和函数count()仅是产生警告示例的一部分。

警告处理函数中的警告信息

__WARN__在其处理函数执行过程中是自动被禁用的。所以在警告处理函数执行过程中产生的(新)警告信息不会导致无限循环。

你可以在perlvar文档中了解到更多细节。Avoid multiple warnings需要注意的是重复的警告信息可能会充斥日志文件。我可以使用一个简单的类似缓存的特性来减少重复警告信息的数量。

可以看到,我们把$counter变量赋值成undef,然后再次调用count()函数来产生同样的警告。

我们也把__WARN__的处理函数替换成一个稍微复杂的版本:在调用logger之前,会检查一下当前字符串是否已经在%WARNShash表中。如果没有的话,会添加它并调用logger()。如果已经有了,就调用return,并不二次记录同样的事件。

你可能回忆起我们在unique values in an array也使用了同样的点子。

local是什么?在上面所有的例子中,我使用local函数?砭植炕?ň?娲?恚┬Ч?Q细窭此担?谡庑├?又形颐敲挥斜匾?饷醋觯?蛭?偕枵庑┐?胧侵鹘疟镜牡谝徊糠帧U庵智榭鱿戮臀匏?搅耍?暇故窃谌?肿饔糜蚶锩妗?/p>

然而,最好是这么用。

local对于在模块中限制(对警告)的改变是很重要的。特别是要发布的模块。如果没有局部化,会影响整个应用程序。limit则会把影响限制在所在的闭合代码块里。

避免使用全局的%WARNS

如果你正在使用Perl 5.或者更新的版本,你可以改写一下代码来替换掉全局变量%WARNS。要这么做的话,需在脚本的开头使用use v5.;,然后在匿名函数内部使用state关键词来声明变量。

Perl基本数组排序方法介绍 本文我们学习如何用Perl对字符串或者数字数组进行排序。Perl有个内置函数叫做sort毫无疑问的可以排序一个数组。其最简单的形式是传递一个数组,它

Perl中怎样从数组中删除某个值? 我不确定undef是否和从数组中消除值有确切的关系,猜测一下,如果我们将undef视为"空",那么会有一些联系。但通常来说,将某些东西赋值为undef和删除

Perl删除前导和拖尾空白(删除左右空格、空白字符) 其它一些编程语言中,有函数ltrim和rtrim分别用于从字符串开头和末尾删除空格和制表符。也有的提供了函数trim来删除字符串两端的空白字符。Perl里没

标签: perl调用perl脚本

本文链接地址:https://www.jiuchutong.com/biancheng/368775.html 转载请保留说明!

上一篇:Perl实现高水线算法(解决多值比较问题方法)

下一篇:Perl基本数组排序方法介绍(perl数组求和)

  • 小规模纳税人缴纳企业所得税
  • 年报补交企业所得税如何写会计分录
  • 业务宣传费和广告费的扣除标准
  • 国债 企业债
  • 一般纳税人资格证书是什么样的
  • 企业所得税营业税金及附加包括
  • 科目汇总表会计核算形式
  • 不交住房公积金了能提取出来吗
  • 公司注销实收资本可以退回股东吗?
  • 到账的钱还能退回去吗
  • 计提租金分录怎么处理
  • 营改增后建筑公司账务处理
  • 报销凭证找不到了怎么办
  • 发票上的税额和报税的数不一样,按照哪个报
  • 拍卖公司如何开展业务
  • 330税盘费是什么意思?
  • 五证一户什么意思
  • 甲公司采用租赁方式租入一台大型设备
  • 应收账款坏账处理审计
  • 企业所得税可以退税吗
  • 公司用自己的设备投资怎么交税呢怎么做账
  • 纳税所得额怎么算个税
  • 原本可以打开的软件
  • 姑娘果的功效与作用百度百科
  • 在windows7环境中鼠标主要的三种操作方式是
  • 原材料暂估分录
  • windows 7怎么打开虚拟化
  • mac笔记本装了双系统后打开苹果系统和原来一样吗
  • php escapeshellarg
  • 怎么开通公众号微信公众平台
  • 车辆违章罚款的钱上交到那了
  • 企业的留存收益可以抵税吗
  • 激光点图片
  • php第三方包
  • 食堂维修费用计什么科目
  • django pypi
  • 一般纳税人公司出售旧车怎么开票
  • pytorch例程
  • 中秋快乐的祝福语怎么说
  • 同业代付的好处
  • 被投资的公司注销后投资公司怎么处理
  • 个人所得税汇算清缴时间
  • dedecms分页标签
  • 如何准确理解nosql的含义?
  • sql server 2008中的权限分为三类
  • mongodb查询操作
  • 一般纳税人商品暂估按销售的数量可以暂估成本吗
  • 财政补贴收入要交增值税税率
  • 汇算清缴职工教育经费
  • 暂估入库的会计分录怎么写
  • 债务重组账务记忆口诀
  • 调账的基本方法及要点都有哪些?
  • 收回已确认并转销的应收账款会导致坏账准备的金额增加
  • 企业租车流程
  • 季节性停工损失计入存货成本吗
  • 印花税如何计算缴纳
  • 应收账款管理应该收集哪些信息
  • 企业的利润怎么提出来
  • 进口货物例题
  • 网上认证平台进不去怎么办
  • sql server存储过程写法
  • windows性能监视器横坐标
  • vista电脑密码忘了怎么解除
  • 盘符在哪
  • Win10 Mobile 10549预览版增DPI缩放 瞬间手机变电脑
  • 虚拟机ubuntu怎么用
  • 超级按钮条上的设置
  • 简述linux的系统结构
  • win7怎么操作
  • android break
  • js中单例模式
  • vue-cal
  • unity制作的2d游戏
  • javascript超链接的onclick
  • javascript入门教程
  • 安卓手机怎么自定义
  • Python使用dis模块把Python反编译为字节码的用法详解
  • 建筑施工税务处理
  • 江苏电子税务局网站官网下载
  • 夫妻双方房子契税怎么算
  • 免责声明:网站部分图片文字素材来源于网络,如有侵权,请及时告知,我们会第一时间删除,谢谢! 邮箱:opceo@qq.com

    鄂ICP备2023003026号

    网站地图: 企业信息 工商信息 财税知识 网络常识 编程技术

    友情链接: 武汉网站建设