Skip site navigation (1)Skip section navigation (2)
Date:      Tue, 8 Jul 2003 08:43:12 -0700
From:      "Drew Tomlinson" <drew@mykitchentable.net>
To:        <dan@slightlystrange.org>, "FreeBSD Questions" <freebsd-questions@freebsd.org>
Subject:   Re: Can I Set Process Name?
Message-ID:  <008501c34567$a3f2eb20$6e2a6ba5@lc.ca.gov>
References:  <003001c3455e$b6c322f0$6e2a6ba5@lc.ca.gov><000a01c34561$228ff5b0$a4b826cb@goo><20030708151439.GD901@zi025.glhnet.mhn.de><003a01c34565$57c94ed0$6e2a6ba5@lc.ca.gov> <20030708152937.GA91154@catflap.home.slightlystrange.org>

next in thread | previous in thread | raw e-mail | index | archive | help
----- Original Message ----- 
From: "Daniel Bye" <dan@slightlystrange.org>
To: "FreeBSD Questions" <freebsd-questions@freebsd.org>
Sent: Tuesday, July 08, 2003 8:29 AM

On Tue, Jul 08, 2003 at 08:26:45AM -0700, Drew Tomlinson wrote:
> >
> > $0='webmin';
             ^
> >
> > However when starting the program it dies with the following
message:
> >
> > Is there something really easy I'm missing?  If it's complicated I'm
> > going to forget it as it's not that important.

> Yes - a `;' at the end of the line  ;-)

Thanks.  That removed the error but failed to change the process name.
I looked at the code a little more.  I'm not experienced in this but it
seems to me that the 'package miniserv;' line calls a precompiled
program?  Here's the beginning of the script:

#!/usr/bin/perl
# A very simple perl web server used by Webmin

$0='webmin';

# Require basic libraries
package miniserv;
use Socket;
use POSIX;

Then a little farther in the script, I see this code:

# Get miniserv's perl path and location
$miniserv_path = $0;
open(SOURCE, $miniserv_path);
<SOURCE> =~ /^#!(\S+)/; $perl_path = $1;
close(SOURCE);
@miniserv_argv = @ARGV;

So I suspect the process name gets set in this somewhere?

Thanks,

Drew





Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?008501c34567$a3f2eb20$6e2a6ba5>