《Perl語言入門》自學筆記--第三章 1
主要是一些數組和列表的介紹和技巧,從中可以充分感受到perl的方便和強大:)
數組方面:
1. 數組是從0開始計數的。
2. 求最後一個元素的索引值:$#rocks
3. 簡單的求最後一個數的值:rocks[-1]
區間操作符來表示列表直接量:
(1..5): 表示1,2,3,4,5
(1.7..5.7): 表示1,2,3,4,5 小數被去除
(5..1): 空列表,只能網上計數
qw快速鍵方式來表示列表直接量:
qw/fred barney betty wilma dino/;
qw{
/usr/local/words
/home/rootbeer/.ispell_english
}
通過qw操作符可以輕鬆的定義列表,前後操作符可以自己定義。
列表賦值:
($fred,$barney,$dino)=("flintstone","rubble",undef);
變數變換的方法:
($fred,$barney)=($barney,$fred);
數組賦值:
@rocks=qw/bedrock slate lava/;
數組複製:
@rocks=@copy
pop和push操作符:
pop函數取出一個數組的最後一個元素並返回它:
@array=5..9;
$fred=pop(@array); # $fred得到9,@array現在有(5,6,7,8)
$fred=pop @array; # $fred得到8,括弧不用一樣,@array現在有(5,6,7)
push函數在數組的最後添加一個元素
push(@array,0); # 現在@array有(5,6,7,0)
push @array,8; # 現在@array有(5,6,7,0,8)
push @array,1..10; # @array後加了10個新元素
shift和unshift函數:
對數組的開頭進行操作,類似於pop和push;
@array=qw#dino fred barney #;
$a=shift(@array); # $a得到dino,@array現在有("fred","barney");
unshift @array,4; # @array現在有4,fred,barney