当前位置：文江博客话题详情

使用 Perl 的“IPC::System::Simple:runx”时如何避免打印到 STDOUT？

发布于 2024-09-24 00:28:59 字数 331 浏览 20 评论 0原文

我正在使用 IPC::System::Simple:runx 执行系统命令并因意外返回值而死亡。问题是命令输出被打印到 shell。

我怎样才能避免打印这个输出？
如何避免打印此输出但将其放入 perl 变量中？

更新

3）如果执行失败，如何打印此输出？

原文

分享到QQ

分享到微博

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

发布评论

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

演出会有结束 2024-10-01 00:28:59

捕获( ) 命令？或 capturex()。

引自链接：

异常处理

在命令返回意外状态的情况下，运行和捕获都会抛出异常，如果没有捕获异常，则会因错误而终止程序。

捕获异常很容易：

eval {
    run("cat *.txt");
};

if ($@) {
    print "Something went wrong - $@\n";
}

有关更多详细信息，请参阅下面的诊断部分。

The capture() command? Or capturex().

Quoted from link:

Exception handling

In the case where the command returns an unexpected status, both run and capture will throw an exception, which if not caught will terminate your program with an error.

Capturing the exception is easy:

eval {
    run("cat *.txt");
};

if ($@) {
    print "Something went wrong - $@\n";
}

See the diagnostics section below for more details.

回复收藏 0 原文

心的位置 2024-10-01 00:28:59

如果一个模块确实表现得非常糟糕并且直接打印到 STDOUT，那么您始终可以将 STDOUT 重定向到其他内容。这是一种 hack，但有些模块需要它。

# Save STDOUT for restore later
open(OLD_STDOUT, ">>&STDOUT");
open(STDOUT, ">/some/file/or/dev/null");
# call your module
# Restore STDOUT
open(STDOUT, ">>&OLD_STDOUT");

If a module does behave very nasty and prints directly to STDOUT you can always redirect STDOUT to something else. This sort of a hack but some modules require it.

# Save STDOUT for restore later
open(OLD_STDOUT, ">>&STDOUT");
open(STDOUT, ">/some/file/or/dev/null");
# call your module
# Restore STDOUT
open(STDOUT, ">>&OLD_STDOUT");

回复收藏 0 原文

~没有更多了~