perl - Perl 中的标量上下文和列表上下文有什么区别？

Question

Perl 中的标量和列表上下文之间有什么区别，这在其他语言(如 Java 或 Javascript)中是否有任何相似之处？

Answer 1

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";

输出:

array: 1 2 4 8 16
first: 1
copy1: 1 2 4 8 16
copy2: 1 2 4 8 16
count: 5

现在:

$first包含 1(数组的第一个元素)，因为 my($first) 中的括号提供一个数组上下文，但在 $first 中只有一个值的空间.

两者 @copy1和 @copy2包含 @array 的副本,

和 $count包含 5 因为它是标量上下文，并且 @array计算为标量上下文中数组中的元素数。

也可以构建更详细的示例(结果仅供读者练习):

my($item1, $item2, @rest) = @array;
my(@copy3, @copy4) = @array, @array;

在我所知道的其他语言中，列表和标量上下文没有直接的平行关系。