freebie:~ 619> perl -e '$ENV{FOO} = "Really?"; system( q/bash -c "echo $FOO"/ )'
Really?