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[0]="a1";
$a[1]="a2";
@a #就會顯示a1a2
@b=@a #可以把乙個陣列中得只copy到另乙個陣列中。
7 pop和push操作
在perl中,經常會用到這兩個操作。
pop是取出陣列中最後乙個元素並返回,那麼陣列中就沒有了這個元素。
如果pop用於乙個空陣列,則返回undef
push將乙個元素新增到陣列的末尾
push(@a,11);
8 ****f和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=reverse @test;
print @test,"\n"; #輸出321
@test=qw(1,2,3);
@test=reverse @test;
print @test,"\n"; #輸出1,2,3
14 sort操作
顧名思義這個是排序的操作,根據內部的字元順序進行排序。
15 上下文概念:乙個給定的表示式在不同的上下文中其含義是不同得。
@test=qw(a,b,c);
@test=sort @test; #顯示列表值abc
$number=42+@test; #顯示45
16 scalar的使用
@test=("a","b","c");
@test=sort @test;
print scalar @test,"\n"; #顯示的是3
17 @test=;
chomp(@test);
print @test,"\n";
這個程式,我們需要在輸入的時候注意,
我們輸入完成後回車是不能結束的,
必須先回車到乙個空白行,在按ctrl+d
這裡的chomp則使輸入的字元鏈結成乙個句子
如果沒有chomp則按輸入的形式輸出。
如果是在windows下則輸入ctrl+z結束
征服Perl 基礎知識 里程碑M3
在perl內部沒有整數值,整數被當成等價的浮點數來處理。來連線字串。x把操作符左邊的字串重複操作右邊數字那麼多次。不用擔心使用數字還是字串,大多數情況下perl將自動轉換他們。perl內嵌的警告 命令列中加引數 w 或在 usr local bin perl w。perl中變數的名字由乙個美圓符號 ...
征服Perl 初識Perl 里程碑M1
由於在工作中要用到perl,所以自己也開始學習了,以前聽說過這個語言,傳說很神秘很強大,從今天開始就慢慢征服它吧!一 perl超級簡單介紹 perl填補了低階語言 c,c 彙編 和高階語言 shell 的空白。低階語言通常難於編碼,並且醜陋,但是速度快 高階語言,在速度上很難超過書寫良好的低階語言。...
征服Perl 雜湊 里程碑M7
1 雜湊 是一種資料機構,和陣列類似,可以將值存放到其中,或者從中取回值。但是,和陣列不同的是,其索引不是數字而是名字。我們可以使用任意的字串作為key,但他們是唯一的。2 在hash中沒有確定的順序,因此沒有第乙個元素。3 hash可以是任意大小,從空hash到任何你記憶體允許的大小。4 在per...