perl - Perl reduce() 因 -d:Profile 而失败

Question

该功能reduce()在 -d:Profile 下无法正常工作。这是一个已知的错误吗？如果是，我如何分析包含此功能的程序？如果没有，我在哪里报告错误？

一个工作示例：文件bad.pl包含

use warnings;

use List::Util qw/reduce/;

print reduce { $a + $b } (1, 2);

然后运行它，我得到：

C:\Test>perl bad.pl
3
C:\Test>perl -d:Profile bad.pl
Use of uninitialized value $b in addition (+) at bad.pl line 5.
Use of uninitialized value $a in addition (+) at bad.pl line 5.
0

我在 Strawberry Perl 和 CentOS 下的 Windows 中得到了相同的结果。