A quick and dirty counter. Change your starting directory accordingly.
$ find /usr/local/lib/perl5/5.8.1/ -name "*.pm" -or -name "*.pod" | \
xargs perl -lne 'print if s/^=head1 //' | \
perl -lne '$ndx{$_}++;END{for(sort{$ndx{$b}<=>$ndx{$a}}
keys %ndx) {exit if$count++>30;print"$_ => $ndx{$_}"}}'
resulting in
NAME => 453
DESCRIPTION => 436
SYNOPSIS => 333
SEE ALSO => 211
AUTHOR => 200
BUGS => 74
COPYRIGHT => 51
AUTHORS => 46
EXAMPLES => 42
HISTORY => 29
NOTES => 29
METHODS => 26
CAVEATS => 23
NOTE => 19
DIAGNOSTICS => 18
AUTHOR AND COPYRIGHT => 14
ABSTRACT => 14
EXAMPLE => 13
ENVIRONMENT => 13
COPYRIGHT AND LICENSE => 12
CONSTRUCTOR => 12
LICENSE => 12
FUNCTIONS => 11
OPTIONS => 9
Utility Changes => 9
WARNING => 8
Modules and Pragmata => 8
Incompatible Changes => 8
Reporting Bugs => 8
EXPORTS => 8
COPYRIGHT AND DISCLAIMERS => 7
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|
