解析Perl map函數(shù)使用
本文和大家重點(diǎn)討論一下Perl map函數(shù)的使用，Perl map函數(shù)就是起了一個(gè)替代foreach循環(huán)的作用，Perl map函數(shù)會(huì)把數(shù)組LIST中的元素挨個(gè)取出，放到系統(tǒng)變量$_中，然后調(diào)用BLOCK去處理。
Perl map函數(shù)使用
Perl里面的Perl map函數(shù)是一種道具，可以讓你的函數(shù)或者表達(dá)式，很方便地施用到一系列對(duì)象上去。
◆Perl map函數(shù)的語(yǔ)法
Perl map函數(shù)BLOCKLIST
Perl map函數(shù)EXPR,LIST
BLOCK是一個(gè)用{}包圍的代碼塊。EXPR可以是子函數(shù)名、正則表達(dá)式等。LIST是輸入列表。
簡(jiǎn)單地說(shuō)，Perl map函數(shù)就是起了一個(gè)替代foreach循環(huán)的作用，Perl map函數(shù)會(huì)把數(shù)組LIST中的元素挨個(gè)取出，放到系統(tǒng)變量$_中，然后調(diào)用BLOCK去處理。值得強(qiáng)調(diào)的是，除非有很特殊的理由，不要去修改$_的值，因?yàn)樾薷?_就是直接改了原始數(shù)組里的元素！BLOCK處理過(guò)的結(jié)果由Perl map函數(shù)返回，仍然是一個(gè)數(shù)組。
◆一個(gè)例子：計(jì)算一系列文件大小
my@sizes=Perl map函數(shù){-s$_}@filenames;
上面例子用-s操作取得一些文件的大小，存到數(shù)組中去。
◆是不是說(shuō)Perl map函數(shù)的輸入數(shù)組和輸出數(shù)組一定等長(zhǎng)呢？不一定的，看這個(gè)
my@books=('PrideandPrejudice','Emma','MasfieldPark','SenseandSensibility','NothangerAbbey','Persuasion','LadySusan','Sanditon','TheWatsons');
現(xiàn)在取出書(shū)名里面所有用到的單詞，并且全部轉(zhuǎn)換成大寫(xiě)
my@words=Perl map函數(shù){split(/\s+/,$_)}@books;
my@uppercases=Perl map函數(shù)uc,@words;
在split起過(guò)作用之后，當(dāng)然@words的長(zhǎng)度要比@books長(zhǎng)了。
◆再舉一個(gè)Perl map函數(shù)嵌套使用的例子：矩陣的轉(zhuǎn)置
- useData::Dumper();
- my@matrix=([a,b,c,d],[e,f,g,h],[i,j,k,l]);
- printDumper(\@matrix);
- my@transposed=Perl map函數(shù){$x=$_;
- [Perl map函數(shù){$matrix[$_][$x]}0..$#matrix];
- }0..$#{$matrix[0]};
- printDumper(\@transposed);
上面的BLOCK里面，Perl map函數(shù)的返回值是用方括號(hào)操作符號(hào)構(gòu)造匿名數(shù)組實(shí)現(xiàn)的。理解這一點(diǎn)就容易看懂代碼了，這個(gè)匿名數(shù)組法常常被用來(lái)構(gòu)造簡(jiǎn)單難懂的代碼，常用伎倆:-)
本文來(lái)自CSDN博客，轉(zhuǎn)載請(qǐng)標(biāo)明出處：http://blog.csdn.net/bocodb/archive/2008/11/19/3324025.aspx
【編輯推薦】
