20090528_00001


※上記の広告は60日以上更新のないWIKIに表示されています。更新することで広告が下部へ移動します。



===============================================

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
...


===============================================

ツールボックス

下から選んでください:

新しいページを作成する
ヘルプ / FAQ もご覧ください。