Date: Sat, 19 Apr 1997 02:18:02 +0200 From: Ollivier Robert <roberto@keltia.freenix.fr> To: current@FreeBSD.org Subject: Re: suid and perl5 Message-ID: <19970419021802.33889@keltia.freenix.fr> In-Reply-To: <199704181951.OAA14482@milo.lodgenet.com>; from John Prince on Fri, Apr 18, 1997 at 02:51:17PM -0500 References: <199704181951.OAA14482@milo.lodgenet.com>
next in thread | previous in thread | raw e-mail | index | archive | help
According to John Prince:
> Is there a problem with setuid and perl5??
Which Perl5 ? 5.002 ? 5.003 ? 5.003_nn (where nn is between 01 and 97f) ?
> #!/usr/local/bin/perl
>
> print "EUID=$> RUID=$<\n";
> exit;
> ----myfile end--
You may need to use /usr/local/bin/suidperl although on my CURRENT box with
5.003_97a, it works perfectly:
-r-sr-xr-x 1 root staff 69 Apr 19 02:15 src/Perl/s.pl
356 [2:15] roberto@keltia:~/src/Perl> ./s.pl
EUID=0 RUID=101
357 [2:15] roberto@keltia:~/src/Perl> cat s.pl
#!/usr/local/bin/perl
print "EUID=$> RUID=$<\n";
exit;
359 [2:15] roberto@keltia:~/src/Perl> perl -V
Summary of my perl5 (5.0 patchlevel 3 subversion 97) configuration:
Platform:
osname=freebsd, osvers=3.0-current, archname=i386-freebsd
...
Locally applied patches:
Dev97A - First development patch to 5.003_97
Built under freebsd
Compiled at Apr 6 1997 21:27:33
--
Ollivier ROBERT -=- FreeBSD: There are no limits -=- roberto@keltia.freenix.fr
FreeBSD keltia.freenix.fr 3.0-CURRENT #41: Sun Mar 23 23:01:22 CET 1997
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?19970419021802.33889>