在 Perl 中，数组是一种用于存储多个标量值的有序列表。数组可以包含数字、字符串、甚至其他变量。数组的标识符以 @ 符号开头。要创建数组，可以使用圆括号 () 来包含列表中的元素，元素之间用逗号 , 分隔。以下是一些创建数组的基本示例：

# 创建一个包含数字的数组  
my @numbers = (1, 2, 3, 4, 5);  
# 创建一个包含字符串的数组  
my @fruits = ('apple', 'banana', 'orange', 'grape');  
# 创建一个混合类型的数组  
my @mixed = (1, 'apple', 3.14, "hello");  
# 空数组的初始化  
my @empty = ();  

访问数组元素

数组的下标从 0 开始。要访问或修改数组的元素，可以使用 $array[index] 的形式：

# 访问数组元素  
my $first_fruit = $fruits[0]; # 'apple'  
my $second_number = $numbers[1]; # 2  
# 修改数组元素  
$fruits[1] = 'strawberry';  

特殊数组变量

• $#array：获取数组的最后一个元素的索引。
• scalar @array：获取数组的长度（元素总数），即此标量上下文返回数组的大小。

my $last_index = $#fruits; # 获取数组最后一个元素的索引  
my $array_size = scalar @fruits; # 获取数组长度  

通过这些基本操作，您可以创建和管理 Perl 中的数组。在编程中，数组用于各种情况，例如存储列表、迭代元素、排序等。