Select Code to Download

alias perlo='perl -Mstrict -Mwarnings -Mautodie=:all'
alias perle='perl -Mstrict -Mwarnings -Mautodie=:all -E'
alias perlb='perl -MO=Deparse,-p -e'
alias perlr='perl -MO=Deparse -e'

$ perlo -E 'my $x; $x = 41; ++$x; say $x'
42
...
++$x;
$x->say;
-e syntax OK

perls () {
    eval "echo \`perl -T -Mstrict -Mwarnings -Mautodie=:all -E '
...
        say defined \$ev ? \"\$ev\" : \"$@\";
    '\`"
}

$ perls 1 + 1
2
...
42
$ perls Hello, world!
Hello, world!