perl -le '$x="exec";eval $x;print "foo";'