perltidy

find -name *.pl | xargs perltidy -b -l=0
find -name *.pm | xargs perltidy -b -l=0