新聞中心
本文和大家重點討論一下利用Perl哈希表建立鍵-值數(shù)據(jù)映射問題,這里告訴你如何創(chuàng)建Perl哈希表,如何插入、刪除要素,以及如何創(chuàng)建嵌套PerlPerl哈希表和利用循環(huán)來處理Perl哈希表。

成都創(chuàng)新互聯(lián)是一家專業(yè)提供寧鄉(xiāng)企業(yè)網(wǎng)站建設(shè),專注與成都網(wǎng)站設(shè)計、網(wǎng)站建設(shè)、H5建站、小程序制作等業(yè)務(wù)。10年已為寧鄉(xiāng)眾多企業(yè)、政府機構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專業(yè)網(wǎng)站制作公司優(yōu)惠進行中。
Perl基礎(chǔ):利用Perl哈希表建立鍵-值數(shù)據(jù)映射
Perl的數(shù)據(jù)結(jié)構(gòu)中最有趣的一個特性是Perl哈希表(hash),它使得在數(shù)據(jù)片段之間建立鍵—值(key-value)關(guān)聯(lián)成為可能。雖然這些Perl哈希表要遠遠比普通系統(tǒng)中以數(shù)字索引的數(shù)組用途更廣,但是往往也會使初學者不知所措。這就是要寫本篇文章的原因所在——它將告訴你如何創(chuàng)建Perl哈希表,如何插入、刪除要素,以及如何創(chuàng)建嵌套PerlPerl哈希表和利用循環(huán)來處理Perl哈希表。
定義Perl哈希表
首先,什么是Perl哈希表?從本質(zhì)上來說,它是以字符串索引的數(shù)組。也就是說,你要使用字符串標簽而不用數(shù)字來存取各個元素。下面是一個例子:
列表A
- #!/usr/bin/Perl
- #definehash
- %alphabet=('a'=>'apple',
- 'b'=>'ball',
- 'c'=>'cat',
- 'x'=>'xylophone');
上面的幾行用四對鍵—值關(guān)聯(lián)建立了一組PerlPerl哈希表??梢宰⒁獾?,變量名前面的符號%表示它是一個Perl哈希表,箭頭用來指出鍵—值關(guān)系。
你也可以這樣寫代碼:
列表B
- #!/usr/bin/Perl
- #definehash
- %alphabet=('a','apple','b','ball','c','cat','x','xylophone');
在定義了一個Perl哈希表以后,你就可以用定義后的名稱對獨立的要素進行存取。例如,看下面的代碼:
列表C
- #!/usr/bin/Perl
- #definehash
- %alphabet=('a','apple','b','ball','c','cat','x','xylophone');
- #accesshashvalue
- print"Aisfor".$alphabet;
輸出結(jié)果為:
Aisforapple.
要清除Perl哈希表,只需簡單地把它賦值于一個空的數(shù)據(jù)集,就像下面的例子:
列表D
- #!/usr/bin/Perl
- #(re)initializehash
- %alphabet=();
插入、改變和刪除Perl哈希表元素
你可以在一個Perl哈希表中插入一個新元素(或者更改一個現(xiàn)有的Perl哈希表),只需要給與之相對應(yīng)的鍵設(shè)置一個新的數(shù)值就行了。如果這個鍵不存在,它將會被創(chuàng)建。下面是一個例子:
列表E
- #!/usr/bin/Perl
- #definehash
- %alphabet=('a','apple','b','ball','c','cat','x','xylophone');
- #addnewelement
- $alphabet='dog';
- #changeexistingelement
- $alphabet='arrow';
- #accesshashvalue
- print"Aisfor".$alphabet;
你可以用delete()函數(shù)刪除一對鍵—值對,就像下面這樣:
列表F
- #!/usr/bin/Perl
- #definehash
- %alphabet=('a','apple','b','ball','c','cat','x','xylophone');
- #deleteelement
- delete$alphabet;
#p#
檢索鍵和數(shù)值
如果你覺得一個Perl哈希表的鍵和數(shù)值有用,需要進一步處理,Perl允許將其提取到單獨的數(shù)據(jù)結(jié)構(gòu)中。你可以用函數(shù)keys()將一個Perl哈希表的鍵返回成為一個數(shù)字索引的數(shù)組。下面是一個例子:
列表G
- #!/bin/Perl
- #definehash
- %alphabet=('a'=>'apple','b'=>'bat','c'=>'cat');
- #getandprinthashkeys
- @keyskeys=keys(%alphabet);
- print"@keys";
或者,你可以用函數(shù)values()獲得一個具有Perl哈希表值的數(shù)組,如下:
列表H
- #!/bin/Perl
- #definehash
- %alphabet=('a'=>'apple','b'=>'bat','c'=>'cat');
- #getandprinthashvalues
- @vals=values(%alphabet);
- print"@v";
計算Perl哈希表的大小
計算Perl哈希表大小的最簡單方法就是用上述的keys()函數(shù),將Perl哈希表中的鍵提取到一個數(shù)組中,然后檢索得到數(shù)組的大小,操作方法如下:
列表I
- #!/bin/Perl
- #definehash
- %alphabet=('a'=>'apple','b'=>'bat','c'=>'cat');
- #printnumberofhashelements
- print"Thehashhas".scalar(keys(%alphabet))."elements";
處理Perl哈希表元素
運用while()循環(huán)處理一個Perl哈希表中的所有元素也比較容易。下面是一個簡單的例子:
列表J
- #!/usr/bin/Perl
- #definehash
- %alphabet=('a','apple','b','ball','c','cat','x','xylophone');
- #loopoverhash
- while(($key,$value)=each(%alphabet)){
- print"$keyisfor$value";
- }
或者,用前面已經(jīng)討論過的for()循環(huán)和keys()函數(shù):
列表K
- #!/usr/bin/Perl
- #definehash
- %alphabet=('a','apple','b','ball','c','cat','x','xylophone');
- #loopoverhash
- for$k(keys(%alphabet)){
- print$k."isfor".$hash."";
- }
運用嵌套的Perl哈希表
Perl也允許在一個Perl哈希表(或數(shù)組)中再嵌入一個Perl哈希表(或數(shù)組)。這樣就為構(gòu)建長而復(fù)雜的數(shù)據(jù)結(jié)構(gòu)提供了很大的靈活性,下面是一個例子:
列表L
- #!/usr/bin/Perl
- %movies=(
- 'black'=>{'hero'=>'Batman','villain'=>'ThePenguin'},
- 'red'=>[{'hero'=>'Spiderman','villain'=>'GreenGoblin'},
- {'hero'=>'Superman','villain'=>'LexLuthor'}]
- );
- #retrieveandprintvalues
- print$movies."fights".$movies."";
- print$movies[1]."fights".$movies[1]."";
該代碼返回的結(jié)果是:
BatmanfightsThePenguin
SupermanfightsLexLuthor
網(wǎng)站欄目:技術(shù)分享利用Perl哈希表建立鍵-值數(shù)據(jù)映射
URL分享:http://m.fisionsoft.com.cn/article/dhhchcj.html


咨詢
建站咨詢
