如何在不使用perl脚本中的perl模块的情况下执行“sudo su - root”

Question

我使用＆＃34; x＆＃34;登录我的服务器用户。在CLI上我可以使用命令＆＃34; sudo su - root＆＃34;并在我的服务器上使用root用户执行subsiquent命令。但是我无法在perl脚本中运行这个sudo su - root命令。如果可能，我需要解决方案而不使用任何perl模块。

Answer 1

如果您想使用自己的密码（用户x的密码）在root环境下执行一些unix命令，那么您可以尝试这样的吗？倾斜（`）

内的Unix命令

`sudo su - root`

示例：

   use warnings;
use strict;

print "Before   :";

print `whoami`;

print `sudo su - root <<EOF

whoami


exit

EOF`;

上面的脚本将在 root环境中使用。让我知道是否有任何澄清或问题！。