Previously Marcus Brinkmann wrote:
> I tried to implement this but failed somehow. Could somebody give a small
> example how to do it in perl?

Changing %ENV should work, since that is also passed along to child
processes.

A very minimal implementation:

#! /usr/bin/perl

$command=pop @ARGV;
foreach $x ( @ARGV) {
        ($var,$value)=split(/=/, $x);
        $ENV{$var}=$value;
}
exec "sh -c $command";

Wichert.

-- 
==============================================================================
This combination of bytes forms a message written to you by Wichert Akkerman.
E-Mail: [EMAIL PROTECTED]
WWW: http://www.wi.leidenuniv.nl/~wichert/

Attachment: pgpMcVksCn4Zv.pgp
Description: PGP signature

Reply via email to