列表切片
在一个列表中,特别是由函数返回的列表中,有时往往只需要取出其中的某几个元素使用。比较一般的办法是将此列表存入一个数组中,然后通过索引值来取出数组元素。但这样的做法会引入一个新的数组,且除了取用的元素以外,其他的元素都没有用处,从而造成了资源上的浪费。
Perl可以将一个列表直接当作一个数组使用,可以使用下标表达式来取出其中的一个或多个元素,这样的操作就称为列表切片。由于列表可以直接被当作数组使用,这样就避免了引入新数组的浪费。例:
$_=(1..10)[1]; #把(1..10)当作一个数组,后接下标[1]表示取用索引值为1的列表元素,并赋值给变量
在使用列表切片时,必须要在函数返回的列表的外层加上一对小括号,构造出列表上下文中的一个列表。例:
$_=(reverse 1..10)[1]; #在reverse返回的列表的外层加上一对括号,构造出列表上下文,然后再对此列表使用列表切片
切片不仅能只切出一个元素,其也可以一次性切出多个元素,并返回一个列表。如果要一次切出多个列表元素,将方括号内的单个下标数字换为由多个下标数字组成的列表即可,这个列表的小括号可以省略。数字之间顺序不限,并且可以重复。例:
($n,$m)=(1..10)[1,-1]; #切出列表中索引值为1的元素和最后一个元素,并将切出的列表赋值给变量列表
@n=(reverse 1..10)[1,1,1,1,1]; #切出5个列表中索引值为1的元素,并将切出的列表赋值给@n
注意:列表切片同列表一样,不能进行双引号内插。
数组切片
下标表达式可以用来取出数组中的一个元素,这是一种常用的可以访问单个数组元素的做法。而类似于列表切片,在数组中也可以一次性切出多个数组元素,并返回一个列表。这样的操作就称为数组切片。数组切片是另一种访问数组元素的做法,其可以一次性访问多个数组元素。
Perl中,$符号一般指取用单个元素,而@符号不仅可以表示整个数组,其也可以与$相对,表示取用多个元素,@是下标表达式的第二种标识符。所以如果下标表达式使用@开头,就表示取用多个数组元素,即数组切片。而相对应的,其下标数字也应由一个数字变为由多个索引值构成的列表。数组切片的返回值也是一个列表,下标数字顺序不限,且可以重复,这些都与列表切片一致。例:
$n[1] #使用$作为下标表达式的标识符,取出数组中的一个元素
@n[1..5] #使用@作为下标表达式的标识符,取出数组中的多个元素
数组切片返回的是一个列表,所以可以应用在各种需要列表的环境中。例:
($n,$m)=@n[2,4]; #将数组切片返回的列表赋值给变量列表
for(@n[1..5]){print} #将数组切片返回的列表作为foreach的参数
数组切片同数组一样,也可以进行双引号内插,且内插的各个数组元素之间会自动以空格隔开,这是其与列表切片的一大不同之处。例:
print”@n[1..5]”; #数组切片内插
哈希切片
哈希切片与数组切片十分相似。其使用@而不是$作为标识符,表示取用多个元素,哈希切片会返回哈希值列表。在哈希切片的下标表达式中,原先花括号围住的单个哈希键应换成由多个哈希键构成的键列表。例:
$hash{a} #取出单个哈希值
@hash{qw/a b c/} #取出qw/a b c/这个哈希键列表对应的多个哈希值,即哈希切片
通过哈希切片切出的哈希值列表可以运用于各种列表上下文中。例:
@hash{qw/a b c/}=qw/aaa bbb ccc/; #使用哈希切片同时对这三个哈希键进行赋值
同数组切片,哈希切片也可以进行双引号内插。例:
print”@hash{qw/a b c/}”; #哈希切片内插
下标表达式的特征性符号
通过上文可知,下标表达式不仅可以用来取用单个数组元素或哈希元素,其也可以用来进行上文所述的三类切片操作。而下标表达式在进行这两种不同的操作时,其返回值所处的上下文是不同的。当取用单个元素时,下标表达式返回的是一个标量,此时其上下文就是标量上下文,而进行切片操作时,下标表达式返回的是一个列表,此时其上下文则是列表上下文。而这其中的决定性因素就在于下标表达式的标识符,这是下标表达式的一类特征性符号。
下标表达式的标识符有两种:$和@,这两种符号决定了下标表达式的上下文。$符号表示取单个元素,所以当以$作为标识符时,下标表达式就是标量上下文,而@符号表示取多个元素,即切片,所以当以@作为标识符时,其上下文就是列表上下文。例:
$n[1] #由$决定标量上下文
@n[1,2] #由@决定列表上下文
列表切片是一种特殊的下标表达式,其恒为列表上下文,也就是说,即使列表切片切出的元素只有一个,此时也是列表上下文。例:
(1..5)[1] #列表切片中的下标表达式,此时为列表上下文
除了$与@,在下标表达式中还有另一类特征性符号,即方括号与花括号,这一对符号决定了下标表达式的操作对象。方括号与花括号均出现于下标表达式的下标中,用于包裹下标数字或哈希键。显然,如果下标表达式使用的是一对方括号,那么其操作对象就是一个数组或列表,而如果下标表达式使用的是一对花括号,那么其操作对象就是哈希。例:
$n[1] #由“[ ]”决定了下标表达式的操作对象是数组
@hash{qw/a b c/} #由“{ }”决定了下标表达式的操作对象是哈希
grep操作符初步
grep与下文中的map操作符都是Perl中的两个非常重要的列表操作符。grep操作符可以用来筛选一个列表中的特定元素,在列表上下文中,其可以将满足条件的所有元素作为一个列表返回,而在标量上下文中,其可以返回筛选出的列表中的元素个数,即满足条件的元素个数。
grep操作符的参数分为两部分,第一部分为一个返回布尔值的代码块,又称选择器。第二部分为需要进行筛选的数组或列表。在grep运行过程中,类似于foreach循环,$_会依次成为列表中每一个元素的临时别名,然后在代码块中对$_进行运算并得到一个布尔值,如果此布尔值为真,那么这个元素就会被筛选出来。全部筛选完毕后,grep会将所有筛选出的元素以一个列表返回。
注意,由于$_是列表元素的临时别名,所以不建议在grep的代码块中对$_的值进行修改,因为这将直接修改列表中元素的值。例:
print grep{$_>5}1..10; #$_会依次成为(1..10)中每一个元素的临时别名,并判断$_>5是否为真,如果为真则筛出。grep在列表上下文中最终返回所有符合条件的元素构成的列表
$n=grep{$_>5}1..10; #在标量上下文中返回满足条件的元素的个数
grep还有更简便的一种写法,如果代码块中的运算式简短到只有一行(如上例),就可以直接将这个运算式作为grep的第一参数书写,从而省去代码块结构,而grep的操作对象则作为其第二参数。例:
print grep$_>1,0,1,2,3; #直接将代码块改为grep的第一参数书写,第二参数为一个省略括号的列表,即grep进行筛选的列表
map操作符初步
map操作符可以用于修改列表中每一个元素的值。其工作方式和书写规则均与grep十分相似。$_会依次成为列表中每一个元素的临时别名,然后执行含有$_的代码块,从而对$_进行修改,并最终返回整个修改过的列表。
map操作符的参数同grep一样,由代码块和需要处理的数组或列表组成。且如果代码块简短到只有一行,就可以直接将代码块改写为map的第一参数。例:
print map$_+=1,1..10; #以$_分别作为列表中每一个元素的临时别名,并返回$_+=1的结果,最终输出由每一个结果所组成的列表
任何形式的grep和map语句都可以改写为foreach循环语句,但由于foreach语句每次只能返回一个元素的判断或运算结果,所以当处理整个数组或列表时,就一定需要一个临时数组来存放结果,这就造成了资源上的浪费。而grep和map可以一次性进行每个元素的运算,直接返回最终的结果列表,从而省去了创建临时数组来存放结果的麻烦,使运算更为高效,也使代码更为简洁。
樱雨楼
完成于2016.1.8
最后修改于2016.1.29