Select Code to Download

$VAR1 = {
          'direct'    => sub { my $s = "abc\ndef\nghi"; },
...
          'constant2' => sub { my $s = qq[abc${\"\n";}def${\"\n";}ghi]
+; },
          'ScalarRO'  => sub { my $s = "abc${nl}def${nl}ghi"; }
};