$ perl -le " die 666 if q/0/ " $ perl -le " die 666 if $what = q/0/ " $ perl -le " die 666 if $what = q/1/ " 666 at -e line 1. $ perl -le " die 666 if $what = q/0E0/ " 666 at -e line 1. $ perl -le " die 666 if $what = q/0 but true/ " 666 at -e line 1.