perl -Mstrict -e 1