Finally found the answer. Setuid perl scripts are run by writing a small C 
wrapper which is suid. Such as

main(ac,av)
int *ac;
char **av;
{
       execv("/path/to/your/perl/script.pl",av);
}

Worked for me.

Spencer

On Monday 10 February 2003 09:30 am, Doc wrote:
> On Mon, 10 Feb 2003, Spencer Ogden wrote:
> > Seems like a good solution, I will give it a try.
> >
> > If Linux does not honor the setuid bit, then how come there are perl
> > man pages about how to write safe setuid scripts in perl? like perldoc
> > perlsec.
>
>   Perl != Linux.
>
> _______________________________________________
> Siglinux mailing list
> [EMAIL PROTECTED]
> http://www.utacm.org/mailman/listinfo/siglinux

_______________________________________________
Siglinux mailing list
[EMAIL PROTECTED]
http://www.utacm.org/mailman/listinfo/siglinux

Reply via email to