perl语言中map与grep用法

1.map用法

　　语法：

　　　　map EXPR, LIST

　　　　map BLOCK, LIST

　　语义：

　　　　让EXPR或者BLOCK内容作用于列表中的每一个元素

　　返回值：

　　　　如果用list保存其返回值，则存储处理后的list

　　　　如果用scalar保存其返回值，则存储处理后list中元素的个数

　　例子：假如给数组中每一个元素都加上一个字母K，且打印出每个元素。

    　 my @place =('AA','BB','CC','DD');
　　　　my @newPlace = map "K$_\n",@place;
　　　　map(print,@newPlace);

2.grep用法
　　用法：与map完全一样，区别在返回值
　　返回值：bool类型，true 或者 false
　　例子：取数组中下标为奇数的元素
　　　　my @nums = (2, 1, 3, 5, 4, 6);
　　　　my @odd = @nums[grep { $_ & 1 } 0..$#nums];
　　　　map print,@odd;