perl的grep，map用法及区别

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 单条语句,@number;
1-2、 @arr=grep {多条语句} @number;
例子：
@arr=map $_%2==1,1..3; // @arr=(1,3)
@arr=map { $_%2==0} 1..3; // @arr=(2)

3、转换
例子：
将找出一个1-100中所有的奇数

grep方式
@arr=grep $_%2==1, 1..100;

map方式
@arr=map {();if($_%2==1){$_;}else{();}} 1..100;
http://zk1878.iteye.com/blog/1164906