perl -nle 'print q! ==> !, eval'
perl -nle "print q! ==> !, eval"