征服Perl——基礎知識——裡程碑M

1 在Perl中，數組的概念和其他語言差不多，有程式設計基礎的人很快就能了解，這裡注意的是數組可以放置不同類型的東西在裡面。

同時，數組不限制長度，Perl會自動增加的，沒有定義的就預設為undef。

2 在數組中，可能要使用最後一個元素，我們一般這樣來實作：

$a[0]="a1";

$a[1]="a2";

$a[2]="a3";

print $a[$#a],"\n"; #其中$#a是表示最後一個元素所在的下标。

3 清單

（1 .. 5）#顯示12345

(1.5 .. 1.7) #顯示12345，對于小數直接舍掉小數點後的。

(5 .. 1) #空清單，左值大于右值就為空。

4 在Perl中經常會用到字元串的清單，我們可以使用qw來省去寫雙引号的麻煩。在Perl中的應用是非常的靈活的，幾乎沒有什麼限制，這樣的話既簡單但有複雜，呵呵。（處理Unix中的檔案名）

5 清單指派

($a,$b,$c)=("a","b","c"); #順序指派

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

如果指派的個數不比對，則Perl自動去掉最後多餘的那個，把它指派成undef。

6 在數組名前面加@就可以引用整個數組。

@a #就會顯示a1a2 

@b=@a #可以把一個數組中得隻copy到另一個數組中。

7 pop和push操作

在Perl中，經常會用到這兩個操作。

pop是取出數組中最後一個元素并傳回，那麼數組中就沒有了這個元素。

如果pop用于一個空數組，則傳回undef

push将一個元素添加到數組的末尾

push(@a,11);

8 shitf和unshift對一個數組的開頭進行操作。

9 将數組插入字元串

@test="like";

print "i @test you","\n";

10 注意/的應用。逃逸字元。

11 foreach控制語句

@test=qw(a,b,c);

foreach $test(@test)

     print $test."\n";

12 Perl最常用的預設變量$_

13 reverse逆轉，逆轉後需要指派給一個變量，如果不指派那就沒有意思了。

@test=(1,2,3);

@test=reverse @test;

print @test,"\n"; #輸出321

@test=("1","2","3");

@test=qw(1,2,3);

print @test,"\n"; #輸出1，2，3

14 sort操作

顧名思義這個是排序的操作，根據内部的字元順序進行排序。

15 上下文概念：一個給定的表達式在不同的上下文中其含義是不同得。

@test=sort @test; #顯示清單值abc

16 scalar的使用

@test=("a","B","c");

@test=sort @test;

print scalar @test,"\n"; #顯示的是3

17 @test=<STDIN>;

chomp(@test);

print @test,"\n";

這個程式，我們需要在輸入的時候注意，

我們輸入完成後回車是不能結束的，

必須先回車到一個空白行，在按ctrl+d

這裡的chomp則使輸入的字元連結成一個句子

如果沒有chomp則按輸入的形式輸出。

如果是在windows下則輸入ctrl+z結束 

本文轉自 小強測試幫 51CTO部落格，原文連結：http://blog.51cto.com/xqtesting/807611，如需轉載請自行聯系原作者