$ perl -E '$x = "foo"; say for $x x= 2'