>perl -Mntheory=:all -nE 'chomp; say is_prime($_);' input.txt
####
qwurx [shmem] ~> perl -E "say '$_'" foo.bar
qwurx [shmem] ~> perl -E "say '$_'" foo.bar
foo.bar
qwurx [shmem] ~> perl -E "say $_" foo.bar
foobar
##
##
qwurx [shmem] ~> echo '`ls -l /dev/null`'
`ls -l /dev/null`
qwurx [shmem] ~> perl -E "say $_"
crw-rw-rw- 1 root root 1, 3 Nov 27 11:02 /dev/null
qwurx [shmem] ~> perl -MO=Deparse -E "say $_"
use feature 'current_sub', 'evalbytes', 'fc', 'say', 'state', 'switch', 'unicode_strings', 'unicode_eval';
say say(say(`ls -l /dev/null`));
-e syntax OK