perl - 使用 Perl 将用户名作为 SSH 中的变量

Question

在我的 Perl 脚本中，我想通过

连接到机器

my $result = `ssh $user@machine`;

其中 $user 是当前计算机上的用户名。然而，这显然不起作用，因为 Perl 将整个字符串识别为一个变量。那么，通过 SSH 连接时是否有其他方法可以在用户名中使用变量？

我已经看到有一个 SSH Perl 模块，但是如果有其他解决方案，我想避免使用其他模块。

提前谢谢您!

Answer 1

逃脱印记卢克:

my $result = `ssh $user\@machine`;

没有数组@machine，不是吗？

反引号是 Quote-like Operators 。 (我建议使用通用 qx{} 版本而不是惯用的反引号。)它会插入(除非您使用 qx'')内容，以便插入 @machine 作为 machine 数组的内容。它通过 $" 变量的内容分隔成员，默认为空格。如果您没有定义 @machine 变量并且没有使用 strict; 如果没有提供 use warnings; 或 -W 参数，它会被插入为空字符串，并且不会发出警告。