Select Code to Download

$ perl -MData::Dumper \
  -le '$Data::Dumper::Useqq=1; print Dumper("foo\r\n")'
$VAR1 = "foo\r\n";
$ perl -MData::Dump=pp -le 'print pp("foo\r\n")'
"foo\r\n"