perl -MData::Dumper -e "$foo=qq(\nHello);$foo =~ s/.//; print Dumper \$foo"