perl -wnl -e