CSDN博客

img freexploit

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

发表于2004/10/18 21:30:00  826人阅读

 

《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

阅读全文
0 0

相关文章推荐

img
取 消
img