Select Code to Download

$ perl -e 'BEGIN { eval "use $]; 1" or die $@ } say "foo"'
String found where operator expected at -e line 1, near "say "foo""
    (Do you need to predeclare say?)
syntax error at -e line 1, near "say "foo""
Execution of -e aborted due to compilation errors.