Under Linux, it could be as short as:
  wc -l **/*.pm
The syntax is that of zsh. It is much more tiring to type, but one can be more portable with:
wc -l `find -name "*.pm"`
It doesn't even need Perl.