Select Code to Download

perl -MO=Deparse -e '$foo = "blarny!"; print $foo.bar.baz.quux;'

$foo = 'blarny!';
print $foo . 'bar' . 'baz' . 'quux';
-e syntax OK