《Perl语言入门》自学笔记－－第三章 1

 

《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