1-列表list指的是標題的有序集合， 而數組(array)則是存儲列表的變量。

更精確地說，列表指的是數據，而數組指的是變量。

訪問數組中的元素

$fred[0] = "yabba";
$fred[1] = "dabba";
$fred[2] = "doo";

$number = 2.71111;
print $fred[$number-1]; #dabba  如果下標不是整數，會舍去小數。
print $fred[145] #如果不存在下標則返回 undef

特殊數組索引， 獲得最後一個元素

$rocks[0] = "one";
$rock[99] = ‘last‘;
print
 
 $rock[$#rock] ; #last
print $rock[-1]; #last

列表直接量

(1,2,3)  (1,2,3,)  ("friend",11)  () (1..100)
(1.7..5.7) (5..1)空列表 (0,2..6,10,12)
("fred", "barrbey"m "wilma")

qw簡寫

qw(fred barrbey wilma)

qw允許使用任何標點符號作為定界符。

qw/ fred barney betty / #可以用反斜杠\轉義定義符

列表的賦值

($fred, $barney, $dino) = (‘a‘, ‘b‘,‘c‘);
print
 
 $barney; #結果為b

($a,$b)=($b,$a); #a,b兩個變量值交換 

數組變量賦值及簡寫

($rocks[0], $rocks[1], $rocks[2]) = qw/a b c/;
@rocks = qw/a b c/; #上面方法的簡寫

數組操作

@a =qw/a b/;
@b =(@a, "c", ‘d‘); #a,b,c,d

pop與push操作， 操作的是最右端

@array = 5..8;
$array1 = pop(@array); #會從array中移除最後一元素元素8，返回8
push @array, 100; #向後加100

shift和unshift操作符, 操作的是最左端

@array = qw# a b c d #;
$m = shift(@array); #@array值為(b,c,d)
unshift(@array, 100); #向前加入100即(100,b,c,d)

perl語言入門總結-第3章-列表與數組