Select Code to Download

perl -MO=Deparse,-q -e"print qq(I am $x\n) . 'and fold this?'"

print(('I am ' . $x . "\n") . 'and fold this?');