Select Code to Download

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

$ perls 6*7
42
...
Number found where operator expected at (eval 6) line 1, near "*.5"
        (Missing operator before 5?)
196***.5