将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

查看源代码中的toke.c文件perl:

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

你会发现许多不会出现在perlfunc中的东西.但是,这取决于您希望如何分割您想要着色的各种内容.

您还可以查看PPI,静态Perl解析器或现有的Perl语法高亮显示器.