امثلة على المصفوفات ARRAYS في لغة Perl

المصفوفة Array :

هي مكان بالذاكرة لتخزين اكثر من قيمة, بعكس المتحول العادي الذي يستطيع تخزين قيمة واحدة فقط.

مثال عن انشاء مصفوفات :

@num = (2015, 2016, 2017);               
@string = ("One", "Two", "Three");  

طباعة قيم مصفوفات :

@num = (2015, 2016, 2017);               
@string = ("One", "Two", "Three");  
print "$num[0]\n";  
print "$num[1]\n";  
print "$num[2]\n";  
print "$string[0]\n";  
print "$string[1]\n";  
print "$string[2]\n";  

الوصول لعناصر معينة في مصفوفة :

@months = qw/Jan Feb Mar Apr May Jun Jul Aug Sept Oct Nov Dec/;  
print "$months[0]\n";  
print "$months[1]\n";  
print "$months[7]\n";  
print "$months[9]\n";  
print "$months[6]\n";  
print "$months[-3]\n";  

مثال عن حجم و طول المصفوفة :

@array = (you, me, us);  
$array[5] = 4;  
$size = @array;  
$index_max = $#array;  
print "Size:  $size\n";  
print "Maximum Index: $index_max\n";  

// Size: 6
// Maximum Index: 5