Perl中的标量和列表上下文之间有什么区别?

use*_*145 5 perl scalar list

Perl中的标量和列表上下文之间的区别是什么?它在Java或Javascript等其他语言中是否有任何并行?

Jon*_*ler 11

Perl中的各种运算符是上下文敏感的,并且在列表和标量上下文中产生不同的结果.

例如:

my(@array) = (1, 2, 4, 8, 16);
my($first) = @array;
my(@copy1) = @array;
my @copy2  = @array;
my $count  = @array;

print "array: @array\n";
print "first: $first\n";
print "copy1: @copy1\n";
print "copy2: @copy2\n";
print "count: $count\n";
Run Code Online (Sandbox Code Playgroud)

输出:

array: 1 2 4 8 16
first: 1
copy1: 1 2 4 8 16
copy2: 1 2 4 8 16
count: 5
Run Code Online (Sandbox Code Playgroud)

现在:

  • $first包含1(数组的第一个元素),因为括号中my($first)提供了一个数组上下文,但是只有一个值的空间$first.
  • 双方@copy1@copy2包含副本@array,
  • 并且$count包含5,因为它是标量上下文,并@array在标量上下文中计算数组中元素的数量.

也可以构建更详细的例子(结果是读者的练习):

my($item1, $item2, @rest) = @array;
my(@copy3, @copy4) = @array, @array;
Run Code Online (Sandbox Code Playgroud)

我所知道的其他语言中的列表和标量上下文没有直接并行.