如何将日志记录信息添加到perl遗留代码中
发布时间：2020-12-16 06:06:30 所属栏目：大数据 来源：网络整理
导读：我有一个内置于perl的中型到大型系统,它是在过去15年中开发的,由许多脚本和pm文件构建, 并且为了改进系统我需要更多的数据,我看到它获取这些数据的最简单的方法是让代码中的每个函数打印出一些日志的开始和结束时间,这样就有可能理解什么花了最多的时间. 然
|
我有一个内置于perl的中型到大型系统,它是在过去15年中开发的,由许多脚本和pm文件构建,
并且为了改进系统我需要更多的数据,我看到它获取这些数据的最简单的方法是让代码中的每个函数打印出一些日志的开始和结束时间,这样就有可能理解什么花了最多的时间. 然而,这是一个旧系统,有些部件比其他部件更难维护,除此之外,我需要它运行,这意味着为了获得真实数据,我需要它从生产中打印出来. 我想要做的是以某种方式覆盖函数declration来包装每个函数start在一行中 NAME启动STARTTIME PARAMS 当它离开功能时 NAME结束了STARTTIME PARAMS 有人能指出我正确的方向吗？ 解决方法
看一下
Devel::NYTProf.它可以描述你所有潜水员所花费的时间(并做更多).它不涉及很多杂乱的代码修改;相反,你只需用它运行你的脚本：
perl -d:NYTProf your_script.pl （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |