有没有办法将打印重定向到 STDERR，以便它们转到 Log::Dispatch？

发布于 2024-12-19 11:25:05 字数 149 浏览 0 评论 0原文

我正在使用 Log::Dispatch 来处理到一个或多个输出的消息传递。在一种情况下，我设置了一个记录到文件的守护进程，但如果它使用的第三方模块写入 STDERR，那么我在日志中看不到这一点。我希望能够将写入 STDERR 的任何内容重定向到 Log::Dispatch。这可能吗？

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

浮华 2024-12-26 11:25:05

您可以绑定它来执行您想要的任何操作。请参阅 perltie：

{
    package StderrToLogDispatch;
    sub TIEHANDLE {
        my ($pkg) = @_;
        return bless {}, $pkg;
    }
    sub PRINT {
        my @msg = @_;
        chomp $msg[-1];
        # I don't use Log::Dispatch, so don't know if this is even close
        Log::Dispatch->logToFile(@msg);
    }
}

tie *STDERR, 'StderrToLogDispatch';
print STDERR 'foo';   # invokes StderrToLogDispatch->PRINT

You could tie it to do whatever you want. See perltie:

{
    package StderrToLogDispatch;
    sub TIEHANDLE {
        my ($pkg) = @_;
        return bless {}, $pkg;
    }
    sub PRINT {
        my @msg = @_;
        chomp $msg[-1];
        # I don't use Log::Dispatch, so don't know if this is even close
        Log::Dispatch->logToFile(@msg);
    }
}

tie *STDERR, 'StderrToLogDispatch';
print STDERR 'foo';   # invokes StderrToLogDispatch->PRINT

回复收藏 0 原文

~没有更多了~