通过 Perl 发送 Windows 终端命令答案

【问题标题】：Sending Windows Terminal Commands Via Perl通过 Perl 发送 Windows 终端命令
【发布时间】：2015-12-22 00:45:46
【问题描述】：

我正在尝试使用 query 终端服务器命令，但 Perl 不断返回此错误：

    'query' is not recognized as an internal or external command,
    operable program or batch file.

如果我直接在命令提示符中输入查询命令，我可以使用它，但是通过 Perl 进行的所有这些尝试都会导致上述错误：

    exec("query /help");
    system("query /help");
    `query /help`;

我猜这与 Perl 创建一个新的 shell 来发送命令的方式有关。有没有办法让它在我正在执行 Perl 脚本的同一个命令 shell 中直接发送？

【问题讨论】：

【解决方案1】：

嗯，我刚刚在我的系统上尝试过：

print system ( "query /help" );

这行得通。所以我的猜测可能是 - 当您使用 perl 时，query 不在路径中。

虽然失败了 - 我建议尝试cmd /c query /help

【讨论】：