===============================================
perl
ttp://code.nanigac.com/forum/view/447
$ perldoc -uT perlfunc | perl -nle '$,="\n";/^(C<[^>]+>,? ?)+$/ and print /<(.*?)>/g' | sort | uniq
$ perl -MCwd -le 'print for sort keys %::Cwd::'
$ perl -MCwd -le 'print for sort @Cwd::EXPORT'
$ php -r 'print(count(array_shift(get_defined_functions())));'
1101
perl -ne "print if /__DATA__/../EOF/" c:/perl/lib/Pod/Functions.pm
最初の行が__DATA__ になってしまうけど、ご愛敬
Pod::Functionsいいですね。まさにです。
%Kinds：カテゴリ、関数リストのハッシュ
%Type：関数、カテゴリのハッシュ
%Flavor：関数、その概要のハッシュ
%Type_Description：カテゴリ、その概要のハッシュ
@Type_Order：関数カテゴリのリスト
%Flavorとかもう完璧です。
# perl -MPod::Functions -le 'print "$_\t$Flavor{$_}" for sort keys %Flavor'
-X a file test (-r, -x, etc)
abs absolute value function
accept accept an incoming socket connect
alarm schedule a SIGALRM
atan2 arctangent of Y/X in the range -PI to PI
bind binds an address to a socket
...
===============================================
