princepawn has asked for the wisdom of the Perl Monks concerning the following question:
my $new_name = 'terrences_process'; $0 = $new_name; my $login = getlogin || 'tmbranno'; warn $login; my %ps = ( 'Darwin' => [qw(ps aux)], 'SunOS' => [qw(ps -eaf)] ); my $uname = `uname`; chomp $uname; my $cmd = join ' ', @{$ps{$uname}}, '|', 'grep', $login , '|', 'grep', + $new_nam\ e; warn $cmd; my $ps = `$cmd`; warn $ps;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: changing title of a process under Solaris
by traveler (Parson) on Aug 22, 2001 at 00:09 UTC | |
|
Re: changing title of a process under Solaris
by princepawn (Parson) on Aug 21, 2001 at 23:57 UTC |