Perl具有SU或类似命令

Question

可能的重复：
当用作CGI-bin时，如何成功运行使用setuid（）的perl脚本？

我正在运行我的perl脚本作为root，并且希望以$USER

运行这些命令

mkdir bin
cp -r /opt/gitolite .
gitolite/install -ln
gitolite setup -pk ${USER}.pub
rm ${USER}.pub
mkdir -p .gitolite/hooks/common
ln -s /opt/pre-receive .gitolite/hooks/common/

问题

Perl有su -c "mkdir bin" $USER还是类似的东西？

Answer 1

使用特殊变量$>。请参阅：http：//perldoc.perl.org/perlvar.html