perl -Xrg -ple '...' *

##</code><code>##

perl -Mr -Mg -ple '...' *

##</code><code>##

------------
:Wq
Not an editor command: Wq