Perl 5.38 发布
2023-07-04 21:34:36 阿炯

Perl 5.38 已于2023年7月上旬正式发布,以下为此版本部分新特性:

新 class 功能
现在可以使用新的实验性语法来定义对象类,其中每个实例的数据存储在行为类似于词汇的 “字段” 变量中。
use feature 'class';
class Point{
 field $x;
 field $y;
 method zero { $x = $y = 0; }
}

这是一个新的实验性功能,并且仍在开发中。

支持 Unicode 15.0

弃用警告有特定的子类别
所有弃用警告现在都有自己特定的弃用类别,可以单独禁用。可在 perldeprecation 和警告中查看所有已弃用功能的列表。
deprecated::apostrophe_as_package_separator
deprecated::delimiter_will_be_paired
deprecated::dot_in_inc
deprecated::goto_construct
deprecated::smartmatch
deprecated::unicode_property_name
deprecated::version_downgrade

仍然可以在单个语句中禁用所有弃用警告
no warnings 'deprecated';

但现在可以进行更细粒度的控制,这些警告会自动启用
use warnings;

%{^HOOK} API 引入
引入了一个名为 %{^HOOK} 的新哈希,当关键字支持任何类型的特殊 hook 时,该 hook 将存在于这个新的哈希中。此哈希中的 hook 将以调用它们的函数命名,后跟两个下划线,然后是它们执行的阶段,当前是在执行关键字之前或之后。此初始版本支持两个 hooks:require__before 和 require__after ,可更轻松地在 require 语句之前和之后执行任务。有关详细信息,请参阅 perlvar 。

PERL_RAND_SEED
添加了一个新的环境变量 PERL_RAND_SEED,可用于导致 Perl 程序使用 rand 而不显式使用 srand() 或使用 srand() 没有可重复的参数。详情参见 perlrun。

可以在编译时通过传递禁用此功能
-Accflags=-DNO_PERL_RAND_SEED

在构建过程中进行配置。

签名中的定义或和逻辑或赋值默认表达式
现在可以使用 //= 或 ||= 运算符分配子例程签名参数的默认表达式,以便在调用者(分别)提供未定义或 false 值时应用默认值,而不仅限于当参数完全丢失时。有关更多详细信息,请参阅 perlsub 中的文档。

@INC Hook 增强功能以​​及 $INC 和 INCDIR
其内部结构已得到强化,可以处理各种边缘情况,且当 hook 在 require 操作期间修改 @INC 时,不再出现段错误或抛出断言失败。现在确保任何给定的钩子在 require 调用期间最多执行一次,并且任何重复的目录不会触发额外的目录探测。

为了更好地控制动态模块查找,现在支持新的 hook 方法 INCDIR 。支持该方法的对象可以被注入到 @INC 数组中,当模块搜索过程中遇到它时就会执行它,就像 INC hook 的执行方式一样,其返回值作为列表使用用于搜索模块的目录。返回空列表相当于无操作。@INC 中不支持 INC 或 INCDIR 方法的 Blessed CODE 引用将不再触发异常,而是被视为与 Unblessed coderef 相同,并像 INC hook 一样执行。

REG_INF 已从 65,536 增加到 2,147,483,647
许多正则表达式量词过去仅限于 U16_MAX ,但现在仅限于 I32_MAX ,因此现在可以编写 /(?:word){1000000}/ 。请注意,这样做可能会导致正则表达式引擎运行时间更长并使用更多内存。

defer 和 finally 块中允许某些 goto
5.36.0 添加了 defer 块,并允许 finally 关键字添加与 try/catch 语法类似的行为。但不允许主体内有任何 goto 表达式,因为它可能导致控制流跳出块。现部分goto表达式已被允许添加,如果它们具有恒定的目标标签,并且该标签可在块中找到。
use feature 'defer';
defer {
  goto LABEL;
  print "This does not execute\n";
  LABEL: print "This does\n";
}

以上为部分重点更新功能,完整的功能变更和弃用/修复,可在官方公告中查看。