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;