在这种情况下,在Perl中做什么？

发布时间：2020-12-15 23:29:23 所属栏目：大数据来源：网络整理

导读：我很困惑第二行在这段代码中做了什么.我认为$runas应该评估给用户的uid.什么是$做？这包含在CGI脚本中. my $runAS = (getpwnam("username"))[2];$runAS = $ if ($runAS == 0); 解决方法 $在perl是一个 special variable： The real uid of this process. You

我很困惑第二行在这段代码中做了什么.我认为$runas应该评估给用户的uid.什么是$<做？这包含在CGI脚本中.

my $runAS = (getpwnam("username"))[2];
$runAS = $< if ($runAS == 0);

解决方法

$<在perl是一个 special variable：

The real uid of this process. You can change both the real uid and the effective uid at the same time by using POSIX::setuid() . Since changes to $< require a system call,check $! after a change attempt to detect any possible errors.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!