find urxvt/ext -type f ! -name '*.pl' -print -exec perlcritic --brutal -- {} \;