perl -wle "\$x=42; print \$x"

##</code><code>##

perl -wle '$x=42; print $x'