perl -mr -e ...