perl的map函数

perl的map函数的使用：

语法

map EXPR, LIST　　　　

map BLOCK LIST　　　

定义和使用

对list中的每个元素执行EXPR或BLOCK（代码块），返回新的list。对每一此迭代，$_中保存了当前迭代的元素的值。

返回值

如果返回值存储在scalar标量中，则代表map()返回数组的元素个数；

如果返回值存储在list中，则代表map()函数的数组；

例：将数组元素都转化为大写的

my @arr=("abc","Hgh","hello");
@arr=map(uc,@arr);
#返回值存在标量中
my $arrCount=map(uc,@arr);
print "@arr\n";#输出ABC HGH HELLO
print "$arrCount\n";#输出3