Select Code to Download

$ perl -M5.022 -e'
   my $x = 123; \my $y = \$x; say $y;
...
   my $x = 123; \my $y = \$x; say $y;
'
123

$ perl -M5.026 -e'
   my $x = 123; my \$y = \$x; say $y;
...
   my $x = 123; my \$y = \$x; say $y;
'
123