perl -MExtUtils::Installed -le '$_=ExtUtils::Installed->new->modules;p
+rint'
1650
perl -le '@_=grep/Module/,split/\n/,`perldoc -uT perllocal`;print scal
+ar@_'
1472
perl -MExtUtils::Installed -le '@_=ExtUtils::Installed->new->modules;p
+rint for sort{lc$a cmp lc$b}@_' >mod.ext
perl -e '@_=grep/Module/,`perldoc -uT perllocal`;for(@_){s/.*?\|([^>]+
+)>/$1/}print for sort{lc$a cmp lc$b} @_' >mod.loc
diff -y mod.ext mod.loc
diff -y mod.ext mod.loc|grep '<'|wc -l
232
diff -y mod.ext mod.loc|grep '>'|wc -l
54