POD の head1 によく使われる項目名ランキング - Craftworks Tech Blog - BranchPOD を書いている際に、参考にしようと、ふと思い立って集計してみました。 集計した環境は、Catalyst, Plagger など依存モジュールが多いモジュールが入った環境です。 集計スクリプトは以下です。上位50位を算出しました。 #!/usr/bin/perl use strict; use warnings; use Perl6::Say; use Path::Class; my %head1; Path::Class::Dir->new('/usr/lib/perl5')->recurse('callback' => sub { my $file = shift; return if $file->is_dir; ++$head1{$_} for ($file->slurp =~ /^=head1 ([A-Z ]+)$/mgo); }); say "$head1{$_}: $_"
