perl實例分析教程之十一--

《perl實例分析教程之十一--》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在應(yīng)用文檔-天天文庫。

1、perl實例分析教程之十一>>四、增加元素　　創(chuàng)建一個關(guān)聯(lián)數(shù)組元素最簡單的方法是賦值，如語句$fruit{"bananas"}=1；把1賦給關(guān)聯(lián)數(shù)組%fruit下標(biāo)為bananas的元素，如果該元素不存在，則被創(chuàng)建，如果數(shù)組%fruit從未使用過，也被創(chuàng)建。這一特性使得關(guān)聯(lián)數(shù)組很容易用于計數(shù)。下面我們用關(guān)聯(lián)數(shù)組改寫上面的程序，注意實現(xiàn)同樣的功能此程序簡化了許多。1:#!/usr/local/bin/perl2:3:p;;6:$ovepunctuation7:$berofoccurrences:n");11:foreach$capeCapitalizedber

2、ofoccurrences:This:1Input:2Here:1Capitalized:1你可以看到，這次程序簡單多了，讀取輸入并存貯各單詞數(shù)目從20行減少到了7行。本程序用關(guān)聯(lián)數(shù)組%wordlist跟蹤首字母大寫的單詞，下標(biāo)就用單詞本身，元素值為該單詞出現(xiàn)的次數(shù)。第11行使用了內(nèi)嵌函數(shù)keys()。這個函數(shù)返回關(guān)聯(lián)數(shù)組的下標(biāo)列表，foreach語句就用此列表循環(huán)。注：關(guān)聯(lián)數(shù)組總是隨機存貯的，因此當(dāng)你用keys()訪問其所有元素時，不保證元素以任何順序出現(xiàn)，特別值得一提的是，它們不會以被創(chuàng)建的順序出現(xiàn)。要想控制關(guān)聯(lián)數(shù)組元素出現(xiàn)的次序，可以用sort()函數(shù)

3、對keys()返回值進(jìn)行排列，如：foreach$capword(sortkeys(%wordlist)){print("$capword:$wordlist{$capword}n");}　五、創(chuàng)建關(guān)聯(lián)數(shù)組　　可以用單個賦值語句創(chuàng)建關(guān)聯(lián)數(shù)組，如：%fruit=("apples",17,"bananas",9,"oranges","none");此語句創(chuàng)建的關(guān)聯(lián)數(shù)組含有下面三個元素：下標(biāo)為apples的元素，值為17下標(biāo)為bananas的元素，值為9下標(biāo)為oranges的元素，值為none注：用列表給關(guān)聯(lián)數(shù)組賦值時，Perl5允許使用"=>"或","來分

4、隔下標(biāo)與值，用"=>"可讀性更好些，上面語句等效于：%fruit=("apples"=>17,"bananas"=>9,"oranges"=>"none");>>>>這篇文章來自..，。