perl -mstrict -mautodie -e '..........'