perl map&grep

map操作和grep操作非常相似，因为他们有同样的参数：一个关注$_的代码块和一个待处理的列表。并且他们的工作模式也非常相似，为每个成员执行一次代码块，块中用$_这个化名迭代原始列表每个成员。但是差别在一个：快最后返回的结果不是真假，而是新产生的列表元素。任何grep或map都可以用foreach循环来重写，当然还得把结果存在一个临时数组中才行。另外grep或map的结果仍然是一个列表，所以可以直接传给另一个函数去处理。比如：要用右对齐的财务数据格式打印列表：

print “The money number are : \n” ,

        map{sprinft("%25s\n", $_)} @formmatted_data;