linux - 如何在 Perl 中删除权限？

Question

我创建了一个将以 root 身份启动的服务器程序。启动后，我想将权限授予另一个用户。我怎样才能安全地做到这一点？

Answer 1

请参阅Privileges::Drop。

Answer 2

你真的不需要一个模块，虽然 Benji York 链接的那个看起来很不错。

$<通过和设置 UID 很简单$>。有关这些的更多信息，请参见perlvar。您也可以使用$(and $);以这种方式设置 GID 请注意，$) = "$target_gid $target_gid"如果要删除补充组，则需要设置。不要忘记事后测试是否成功。