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

【问题标题】：How to perform "sudo su - root" without using perl modules in perl script如何在 perl 脚本中不使用 perl 模块执行“sudo su - root”
【发布时间】：2014-07-09 06:14:40
【问题描述】：

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

【问题讨论】：

sudo bash 呢？

标签： perl unix sudo

【解决方案1】：

如果你想在 root 环境下使用你自己的密码（用户 x 的密码）执行一些 unix 命令，那么你能试试这样吗？ tilt(`)

中的 Unix 命令

`sudo su - root`

示例：

   use warnings;
use strict;

print "Before   :";

print `whoami`;

print `sudo su - root <<EOF

whoami


exit

EOF`;

上面的脚本可以在 root 环境中使用。如果有任何澄清或问题，请告诉我！

【讨论】：