mpapec's questions

我得到了这个预期的输出

perl -MData::Dumper -e 'print Dumper do q(./dotest.pl)'
$VAR1 = [
          1,
          2,
          3,
          4
        ];

而dotest.pl​

use strict;
use warnings;

my $x=1;
if ($x) {
  my $ret = [
    # map { my %h = (x => $_); \%h }
    1..4
  ];
}

sub foo { 1 }

但是，当我取消注释地图转换时，单行程序不会输出任何内容。

这是一个错误吗？perl 是5.34.0