$ENV{foo} = "abc";
my $out = `echo \$foo`;

print "$^X ($]): Export ",
      $out ne "abc\n" ? "not " : "",
      "OK\n";