perl -Xrg -ple '...' *