Perl中的數組是一種有序的數據集合，可以存儲一組相同類型的數據。數組可以包含任意數量的元素，并且每個元素可以通過索引來訪問。以下是Perl數組的用法詳盡解讀。
要聲明一個數組，可以使用@符號，后面跟上一對圓括號（）或方括號[]。
my @array;
可以在聲明數組時初始化數組，也可以在后續的代碼中為數組賦值。
my @array = (1, 2, 3);
可以使用數組的索引來訪問數組元素，索引從0開始。
my @array = (1, 2, 3);
print $array[0]; # 輸出1
可以使用scalar函數獲取數組的長度。
my @array = (1, 2, 3);
my $length = scalar @array;
print $length; # 輸出3
可以使用push函數將元素添加到數組的末尾。
my @array = (1, 2, 3);
push @array, 4;
print @array; # 輸出1 2 3 4
可以使用pop函數刪除數組的最后一個元素，并返回被刪除的元素。
my @array = (1, 2, 3);
my $removed_element = pop @array;
print $removed_element; # 輸出3
可以使用數組的切片來獲取數組的子集。
my @array = (1, 2, 3, 4, 5);
my @slice = @array[1..3];
print @slice; # 輸出2 3 4
可以使用foreach循環遍歷數組中的元素。
my @array = (1, 2, 3);
foreach my $element (@array) {
print $element;
}
可以使用sort函數對數組進行排序。
my @array = (3, 1, 2);
my @sorted_array = sort @array;
print @sorted_array; # 輸出1 2 3
可以使用concatenate操作符(.)將數組合并成一個新的數組。
my @array1 = (1, 2);
my @array2 = (3, 4);
my @merged_array = @array1 . @array2;
print @merged_array; # 輸出1 2 3 4
這些是Perl數組的基本用法，可以幫助您在Perl編程中更好地使用和操作數組。
