Perl中的grep和map

http://blog.chinaunix.net/uid-23391008-id-2610416.html

1、map

? ? ? 对数组的每个元素计算语句值，最后将得到的最终值组成一个数组返回，$_为当前元素值

格式：

? ? ? 1-1、 @arr=map 单条语句,@number;

? ? ? 1-2、?@arr=map {多条语句} @number;

例子：

? ? ?@arr=map $_+1,1..3; ?// @arr=(2,3,4)

? ? ?@arr=map {$_=$_+1;$_+1} 1..3;?? // @arr=(3,4,5)

?

2、grep

? 对数组的轮询，语句（语句块）为真-------选择，则对将该元素加入到返回的数组中（返回的数组初始为空），$_为当前元素值

? ? ? 1-1、 @arr=grep 单条语句,sans-serif; font-size:16px; line-height:25px"> ? ? ? 1-2、?@arr=grep {多条语句} @number;

? ? ?@arr=grep $_%2==1,1..3; ?// @arr=(1,3)

? ? ?@arr=grep {?$_%2==0} 1..3;?? // @arr=(2)

http://blog.csdn.net/autofei/article/details/6674346

grep返回一个数字中符合条件的所有元素；map对数字中所有元素实施转化并返回结果。两者都遍历了数组，但一个用来搜索，一个用来转化。两者都支持表达式或者代码块。