From owner-freebsd-current  Fri Apr 18 14:33:43 1997
Return-Path: <owner-current>
Received: (from root@localhost)
          by freefall.freebsd.org (8.8.5/8.8.5) id OAA05151
          for current-outgoing; Fri, 18 Apr 1997 14:33:43 -0700 (PDT)
Received: from mercury.uniserve.com (mercury.uniserve.com [204.191.197.248])
          by freefall.freebsd.org (8.8.5/8.8.5) with ESMTP id OAA05146
          for <current@freebsd.org>; Fri, 18 Apr 1997 14:33:39 -0700 (PDT)
Received: from haven.uniserve.com (shell.uniserve.com [198.53.215.121]) by mercury.uniserve.com (8.8.2/8.8.2) with SMTP id OAA00249; Fri, 18 Apr 1997 14:27:34 -0700 (PDT)
Date: Fri, 18 Apr 1997 14:39:11 -0700 (PDT)
From: Tom Samplonius <tom@uniserve.com>
To: John Prince <johnp@lodgenet.com>
cc: current@freebsd.org
Subject: Re: suid and perl5
In-Reply-To: <199704181951.OAA14482@milo.lodgenet.com>
Message-ID: <Pine.NEB.3.95.970418143750.4347L-100000@haven.uniserve.com>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Sender: owner-current@freebsd.org
X-Loop: FreeBSD.org
Precedence: bulk


On Fri, 18 Apr 1997, John Prince wrote:

> Is there a problem with setuid and perl5??
> The following works with 2.1.0-RELEASE, and not on 2.2.1-RELEASE
> 
> ----myfile start--
> #!/usr/local/bin/perl    
> 
>         print "EUID=$>     RUID=$<\n";
> exit;
> ----myfile end--
> sudo chmod 4755 myfile
> sudo chown root myfile
> myfile
> returns nothing...
> 
> Any Suggestions??
> 
> John Prince


  You should be using /usr/bin/suidperl

  It also depends on how the perl5 was built.

Tom
System Support
Uniserve