Select Code to Download

$ perl -ce '"my" $y'
Scalar found where operator expected at -e line 1, near ""my" $y"
        (Missing operator before  $y?)

say my $x = 5;