Perl 祝福胖逗号

Question

我知道 perl bless 可以接受 1 或 2 个参数，如 perlbless 中所述。 。但是，我不明白下面代码中带有粗逗号的祝福是做什么的？它与bless\$value,$class; 相同吗？

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

    bless \$value => $class;
}

Answer 1

粗逗号只是逗号的另一种书写方式。您可以通过以下方式查看:

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

可以找到一个有趣的讨论here也是。