From owner-freebsd-questions@FreeBSD.ORG  Fri May 12 03:27:15 2006
Return-Path: <owner-freebsd-questions@FreeBSD.ORG>
X-Original-To: freebsd-questions@freebsd.org
Delivered-To: freebsd-questions@freebsd.org
Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125])
	by hub.freebsd.org (Postfix) with ESMTP id BB93516A41A
	for <freebsd-questions@freebsd.org>;
	Fri, 12 May 2006 03:27:15 +0000 (UTC)
	(envelope-from prvs=johnl=02800913fd@iecc.com)
Received: from xuxa.iecc.com (xuxa.iecc.com [208.31.42.42])
	by mx1.FreeBSD.org (Postfix) with SMTP id 9DDA143DBB
	for <freebsd-questions@freebsd.org>;
	Fri, 12 May 2006 03:07:19 +0000 (GMT)
	(envelope-from prvs=johnl=02800913fd@iecc.com)
Received: (qmail 3182 invoked from network); 12 May 2006 03:07:18 -0000
Received: from simone.iecc.com (208.31.42.47)
	by mail2.iecc.com with QMQP; 12 May 2006 03:07:18 -0000
Date: 12 May 2006 03:07:18 -0000
Message-ID: <20060512030718.14162.qmail@simone.iecc.com>
From: John Levine <johnl@iecc.com>
To: freebsd-questions@freebsd.org
In-Reply-To: <191ac950d308bc36847f124e686b38f2@prodigy.net>
Organization: 
Mime-Version: 1.0
Content-type: text/plain; charset=iso-8859-1
Content-transfer-encoding: 7bit
Cc: jekillen@prodigy.net
Subject: setuid perl scripts ?
X-BeenThere: freebsd-questions@freebsd.org
X-Mailman-Version: 2.1.5
Precedence: list
List-Id: User questions <freebsd-questions.freebsd.org>
List-Unsubscribe: <http://lists.freebsd.org/mailman/listinfo/freebsd-questions>, 
	<mailto:freebsd-questions-request@freebsd.org?subject=unsubscribe>
List-Archive: <http://lists.freebsd.org/pipermail/freebsd-questions>
List-Post: <mailto:freebsd-questions@freebsd.org>
List-Help: <mailto:freebsd-questions-request@freebsd.org?subject=help>
List-Subscribe: <http://lists.freebsd.org/mailman/listinfo/freebsd-questions>, 
	<mailto:freebsd-questions-request@freebsd.org?subject=subscribe>
X-List-Received-Date: Fri, 12 May 2006 03:27:21 -0000

It is my distinct impression that setuid perl scripts are supposed to
work.  That is, if you have an executable perl script with the setuid
bit, perl will start itself up and run suidperl or something and do
the necessary backflips to get itself running with the script's owner
as the effective UID.

This doesn't seem to to work in perl 5.8.8 on FreeBSD 6.0, using a
copy of perl built in the obvious way in the ports tree.  Is it
supposed to work?  Do I have to do something special to turn it on?

R's,
John



Characteristics of this binary (from libperl):
  Compile-time options: MYMALLOC PERL_MALLOC_WRAP USE_64_BIT_INT
                        USE_LARGE_FILES USE_PERLIO
  Locally applied patches:
        defined-or
  Built under freebsd
  Compiled at May 10 2006 20:36:34
  @INC:
    /usr/local/lib/perl5/5.8.8/BSDPAN
    /usr/local/lib/perl5/site_perl/5.8.8/mach
    /usr/local/lib/perl5/site_perl/5.8.8
    /usr/local/lib/perl5/site_perl/5.8.7
    /usr/local/lib/perl5/site_perl/5.8.6
    /usr/local/lib/perl5/site_perl
    /usr/local/lib/perl5/5.8.8/mach
    /usr/local/lib/perl5/5.8.8
    .