$ perl -le'$ENV{foo} = "bar";system("echo \$foo")' bar