I mean this in very limited circumstances such as:

perl -e '$a = "abcde"; print ($a =~ m/a.c/ ? "hit" : "miss");';
[download]

If it ever goes into a file then use strict, use warnings is ALWAYS there at the top. ALWAYS.