perl -p|-n