perl祝福用逗号逗号

Question

我知道，如perlbless所述，perl bless可以接受1或2个arg。但是，我不明白用以下代码中的胖逗号来保佑什么呢？它与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

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