PPI :: Document bug还是一些特殊的子程序名？

Question

我有一些PPI模块的问题:

假设我有Foo.pm:

package Foo;

sub foo0 { 1; }
sub foo1 { 1; }
sub foo2 { 1; }
sub foo3 { 1; }

1;

我想用PPI来获得所有潜艇:

#!/usr/bin/env perl
use PPI;
my $filename = shift;
my $Document = PPI::Document->new($filename);
my $subs = $Document->find('PPI::Statement::Sub');
warn $#$subs;

结果我得到'3'这是正确的.

但当我在Foo.pm中的一个潜艇称为'sub vN ...'时,其中N是一个数字,fe:

sub v1foo {}

要么

sub v3bar {}

或者干脆

sub v2 {}

PPI :: Document find似乎打破了解析并只返回已经找到的subs.所以,如果我修改Foo:

package Foo;

sub foo0 { 1; }
sub foo1 { 1; }
sub v2xx { 1; }
sub foo3 { 1; }

1;

我的测试结果是"1"(发现subs是foo0和foo1)

以某种方式禁止以v [0..9]声明子程序名称？

问候.

Answer 1

这是一个(未知)错误.

它与"v-numbers"或"version number"的概念有关.

v数字看起来像v1.2.3,解析器变成PPI :: Token :: Number :: Version对象.

您看到的问题是解析器发现"v,digit,...",将其解析为v-number,然后在其后面的字符处开始下一个令牌(它不应该这样做).

另外,在子v1 {}的情况下,v1应该被解析为子程序名称"v1"而不是v-number.

您应该在https://rt.cpan.org/Public/Dist/Display.html?Name=PPI上报告此PPI错误跟踪器