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

例如：

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

print "array: @arrayn";
print "first: $firstn";
print "copy1: @copy1n";
print "copy2: @copy2n";
print "count: $countn";

输出：

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;

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