perl – 空列表可以在标量上下文中吗？

代码中没有逗号,因此没有列表运算符.

代码中没有列表上下文,因此没有列表值.

因此,没有列表

my $s = ();

括号永远不会创建列表

(仅在赋值运算符的LHS上间接进行.)

what do we call the empty list in scalar context

Perl将其称为“存根”(如下所示),这就是它的真实含义.它是代码中的占位符,其中几乎没有任何东西是不允许的.

存根由“空括号”表示,因此它是另一个名称.

我称之为糟糕的代码.如果要分配undef,请指定undef.

There is a lie that a list in scalar context yields the last element of the list.

不,那是真的.列表值不能存在于标量上下文中,因此离开列表运算符.

列表运算符(即逗号运算符)在标量上下文中返回列表的最后一个元素.

比较以下内容.没有提到清单：

>perl -MO=Concise -e"my $s = ();"
6  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v:{ ->3
5     <2> sassign vKS/2 ->6
3        <0> stub sP ->4
4        <0> padsv[$s:1,2] sRM*/LVINTRO ->5
-e syntax OK

提到了一个清单

>perl -MO=Concise -e"my @a = ();"
7  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v:{ ->3
6     <2> aassign[t2] vKS ->7
-        <1> ex-list lK ->4
3           <0> pushmark s ->4
-           <0> stub lP ->-
-        <1> ex-list lK ->6
4           <0> pushmark s ->5
5           <0> padav[@a:1,2] lRM*/LVINTRO ->6
-e syntax OK

……它与parens无关

>perl -MO=Concise -e"my @a = 's';"
8  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v:{ ->3
7     <2> aassign[t2] vKS ->8
-        <1> ex-list lK ->5
3           <0> pushmark s ->4
4           <$> const[PV "s"] s ->5
-        <1> ex-list lK ->7
5           <0> pushmark s ->6
6           <0> padav[@a:1,2] lRM*/LVINTRO ->7
-e syntax OK