perl - perl 用胖逗号祝福

Question

我知道 perl bless 可以接受 1 或 2 个 arg，如perlbless中所述。但是，我不明白下面代码中的胖逗号是做什么的？是一样的bless \$value,$class;吗？

# Construct the tie.
sub TIESCALAR { 
    my $class = shift;
    my $value = shift || 0;

    bless \$value => $class;
}

Answer 1

胖逗号只是另一种写法comma。你可以看到这个：

perl -MO=Deparse -e 'bless \$value => $class'
bless \$value, $class;
-e syntax OK

在这里也可以找到一个有趣的讨论。