perl -I. -Mstrict -e '$x=42'

perl     -Mstrict -e '$x=42'
ouch!