我知道perlbless可以像perlbless那样接受1或2个参数。但是,我不明白下面代码中带一个粗逗号的bless在做什么?它和bless \$value,$class;一样吗?
bless \$value,$class;
# Construct the tie. sub TIESCALAR { my $class = shift; my $value = shift || 0; bless \$value => $class; }
ajsxfq5m1#
粗逗号是comma的另一种写法,可以用以下语句来表示:
comma
perl -MO=Deparse -e 'bless \$value => $class' bless \$value, $class; -e syntax OK
一个有趣的讨论可以找到here太。
1条答案
按热度按时间ajsxfq5m1#
粗逗号是
comma
的另一种写法,可以用以下语句来表示:一个有趣的讨论可以找到here太。