#! /usr/bin/perl -w

use strict;

my $var   = shift || 'FOO';
my $value = shift || 'bar';

$ENV{$var} = $value;
system "./env-echo $var";