map函数提供了一种将一系列值转换成另一系列值的方法。通常是一对一的转换，但是最后的结果也可以比原来的列表长或短一些。
my @numbers = (1..5); print "@numbers\n"; # 1 2 3 4 5 my @doubles = map {$_ * 2} @numbers; print "@doubles\n"; # 2 4 6 8 10
map
原文：https://www.cnblogs.com/qiyuexin/p/8824375.html
