From owner-freebsd-current  Tue Sep 15 19:48:56 1998
Return-Path: <owner-freebsd-current@FreeBSD.ORG>
Received: (from majordom@localhost)
          by hub.freebsd.org (8.8.8/8.8.8) id TAA13804
          for freebsd-current-outgoing; Tue, 15 Sep 1998 19:48:56 -0700 (PDT)
          (envelope-from owner-freebsd-current@FreeBSD.ORG)
Received: from godzilla.zeta.org.au (godzilla.zeta.org.au [203.15.68.22])
          by hub.freebsd.org (8.8.8/8.8.8) with ESMTP id TAA13785;
          Tue, 15 Sep 1998 19:48:37 -0700 (PDT)
          (envelope-from bde@godzilla.zeta.org.au)
Received: (from bde@localhost)
	by godzilla.zeta.org.au (8.8.7/8.8.7) id MAA23358;
	Wed, 16 Sep 1998 12:48:13 +1000
Date: Wed, 16 Sep 1998 12:48:13 +1000
From: Bruce Evans <bde@zeta.org.au>
Message-Id: <199809160248.MAA23358@godzilla.zeta.org.au>
To: current@FreeBSD.ORG, jmz@FreeBSD.ORG
Subject: Re: Perl 5: suid scripts broken?
Sender: owner-freebsd-current@FreeBSD.ORG
Precedence: bulk
X-Loop: FreeBSD.ORG

>bash# ./a.pl
>Can't do setuid
>bash# ls -l a.pl
>-rwsr-xr-x  1 root  wheel  28 Sep 16 01:44 a.pl
>bash# cat a.pl
>#!/usr/bin/suidperl
>exit 0;

According to ktrace, suidperl just gives up after failing to exec
/usr/bin/perl5.00502.

Bruce

To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-current" in the body of the message