Searched refs:d_dosuid (Results 1 – 3 of 3) sorted by relevance
43 if ($d_dosuid && $>) { die "You must run as root to install suidperl\n"; }52 -x 'suidperl' || die "suidperl isn't executable!\n" if $d_dosuid;67 if ($d_dosuid) {83 &link("$installbin/sperl$ver", "$installbin/suidperl") if $d_dosuid;
21 case "$d_dosuid" in
2292 case "$d_dosuid" in2313 y*) d_dosuid="$define";;2314 *) d_dosuid="$undef";;3830 d_dosuid='$d_dosuid'