有没有办法打开perl跟踪(相当于bash -x)？

发布时间：2020-12-15 21:21:13 所属栏目：大数据来源：网络整理

导读：我在perl中有一个系统脚本。我需要一些等效的bash -x来确定脚本出了什么问题。有相当的东西吗？编辑：bash -x的作用是在评估时打印每行。这使得调试代码只是丢失一些路径变量或文件非常容易。解决方法看看 Devel::Trace 或 Devel::ebug 。给定这个名为w.

我在perl中有一个系统脚本。我需要一些等效的bash -x来确定脚本出了什么问题。有相当的东西吗？

编辑：bash -x的作用是在评估时打印每行。这使得调试代码只是丢失一些路径变量或文件非常容易。

解决方法

看看 Devel::Trace或 Devel::ebug。

给定这个名为w.pl的程序：

#!/usr/bin/perl

use strict;
use warnings;

my $answer = 42;

if ($answer == 6 * 9) {
    print "everything is running fine.n";
} else {
    warn "there must be a bug somewhere...n";
}

您可以使用Devel :: Trace来监视执行：

perl -d:Trace w.pl

其中产生以下输出：

>> w.pl:6: my $answer = 42;
>> w.pl:8: if ($answer == 6 * 9) {
>> w.pl:11:     warn "there must be a bug somewhere...n";
there must be a bug somewhere...

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!