[17396] in Perl-Users-Digest
Re: none
daemon@ATHENA.MIT.EDU (Aaron M. Ucko)
Sun Nov 5 18:39:50 2000
To: "Ben 'Max' Davis" <bendavis@MIT.EDU>
Cc: perl-users@MIT.EDU
From: amu@MIT.EDU (Aaron M. Ucko)
Date: 05 Nov 2000 18:37:04 -0500
In-Reply-To: "Ben 'Max' Davis"'s message of "Sun, 5 Nov 2000 17:21:01 -0500 (EST)"
Message-Id: <87aebef0tb.fsf@mit.edu>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
The issue is that under Unix, changes to the environment only affect
descendant processes. You want something like this:
foreach (split('; ', `attach -Padd newtex`)) {
if (/^setenv (\S+) (.*)$/) {
$ENV{$1} = $2;
} else {
print STDERR "malformatted setting $_\n";
}
}
--
Aaron M. Ucko, KB1CJC <amu@mit.edu> (finger amu@monk.mit.edu)
