perl - 为什么 Perl 的字符串乘法不会在 undef 上发出警告？

Question

在下面

use strict;
use warnings;
my $foo = undef;

表达式

$foo . ''

和

"$foo"

两者都生产

Use of uninitialized value $foo in ... at ...

但下面的表达式给出了空字符串而没有警告：

$foo x 1

Anyone knows why? I mean, it's cool to have a nice stringification idiom ($_ x 1 is quite much shorter than defined ? "$_" : ''), but it feels a bit weird.

Answer 1

我曾经在法学院的课堂上看过一个有场景的节目。讲师向他的学生展示了两个类似的案例，并询问他们为什么会导致不同的裁决。这是因为裁决是由法官做出的，而法官是人，他最终解释说。

那应该警告。从事 Perl 工作的开发人员是人。如果您愿意，请运行perlbug以发送错误报告。