join('x', qw( a b c )) = "foo";

##</code><code>##

substr($x, 2, 4) = "ouch";