标量 vs 列表赋值运算符

Question

请帮助我理解以下片段：

• my $count = @array;
• my @copy = @array;
• my ($first) = @array;
• (my $copy = $str) =~ s/\\/\\\\/g;
• my ($x) = f() or die;
• my $count = () = f();
• print($x = $y);
• print(@x = @y);

Answer 1

该符号=被编译为两个赋值运算符之一：

• 一个列表赋值运算符（aassign）用于若的左手侧（LHS）=是某种骨料。
• 甲标量赋值运算符（sassign）被以其它方式使用。

以下被认为是聚合：

• 括号中的任何表达式（例如(...)）
• 一个数组（例如@array）
• 一个数组切片（例如@array[...]）
• 哈希（例如%hash）
• 一个哈希切片（例如@hash{...}）
• 任何以上前面有my,our或local

运营商之间有两个区别。

操作数的上下文

这两个运算符在其操作数被评估的上下文中有所不同。

• 标量赋值在标量上下文中计算它的两个操作数。

  # @array evaluated in scalar context.
  my $count = @array;
  

• 列表赋值在列表上下文中评估它的两个操作数。

  # @array evaluated in list context.
  my @copy = @array;
  

  # @array evaluated in list context.
  my ($first) = @array;
  

返回的值

这两个运算符的返回内容不同。

• 标量赋值...

  • ...在标量上下文中将其 LHS 计算为左值。

    # The s/// operates on $copy.
    (my $copy = $str) =~ s/\\/\\\\/g;
    

  • ... 在列表上下文中将其 LHS 计算为左值。

    # Prints $x.
    print($x = $y);
    

• 列表分配...

  • ... 在标量上下文中计算其 RHS 返回的标量数。

    # Only dies if f() returns an empty list.
    # This does not die if f() returns a
    # false scalar like zero or undef.
    my ($x) = f() or die;
    

    # $counts gets the number of scalars returns by f().
    my $count = () = f();
    

  • ... 在列表上下文中计算其 LHS 作为左值返回的标量。

    # Prints @x.
    print(@x = @y);