为什么要使用这个奇怪的包名变体?

ede*_*dem 3 perl dbix-class

有人可以解释一下程序员在DBIx :: Class模块的文件SQLite.pm中使用这个变体"包名"的目标吗?完整列表:

package # Hide from PAUSE
  DBIx::Class::SQLAHacks::SQLite;

use warnings;
use strict;

use base qw( DBIx::Class::SQLMaker::SQLite );

1;
Run Code Online (Sandbox Code Playgroud)

为什么在'package'之后将包的名称写在其他行?

cjm*_*cjm 12

Perl并不关心package包名称之间的空格和注释,但是PAUSE索引器可以.它不会索引看起来像这样的包.DBIx :: Class人员不希望该类被索引.

另一种(更标准)的方法是META.json或META.yml文件中的no_index密钥.