將所有 Perl 的內置函數作為列表的最佳方法是什么？

Question

我正在嘗試更新用於語法突出顯示的 xml 文件，因此我想知道獲取所有 Perl 內置函數列表的最簡單方法是什么。

Answer 1

這是 cnicutar 想法的快速實現：

use Pod::Find qw(pod_where);

my $perlfunc_path = pod_where({ -inc => 1 }, 'perlfunc');

open my $in, "<", $perlfunc_path or die "$perlfunc_path: $!";
while(<$in>) {
    last if /=head2 Alphabetical/;
}

while(<$in>) {
    print "$1\n" if /=item (.{2,})/;
}

為您提供包括如下參數的列表：

-X FILEHANDLE
-X EXPR
-X DIRHANDLE
-X
abs VALUE
abs
...

Answer 2

查看perl源碼中的toke.c文件：

  $ perl -nE 'next unless /case KEY_(\S+):/; say $1' toke.c | sort | uniq

您會發現許多不會出現在perlfunc中的東西。 但是，這取決於您要如何分割要着色的各種事物。

您還可以查看PPI 、 static Perl 解析器或現有的 Perl 語法熒光筆。

Answer 3

我會解析perldoc perlfunc （“Perl Functions by Category”部分）。

Answer 4

我剛才遇到了同樣的問題，並且

egrep '^=item' /usr/lib/perl5/5.10.0/pod/perlfunc.pod | perl -anle '$F[1]=~s/\W//g; print $F[1]' | sort | uniq

為我工作（但請注意，它並不完美）