建站
咨詢
售后
建站咨詢
新聞中心
本文和大家重點討論一下利用Perl哈希表建立鍵－值數(shù)據(jù)映射問題，這里告訴你如何創(chuàng)建Perl哈希表，如何插入、刪除要素，以及如何創(chuàng)建嵌套PerlPerl哈希表和利用循環(huán)來處理Perl哈希表。
成都創(chuàng)新互聯(lián)是一家專業(yè)提供寧鄉(xiāng)企業(yè)網(wǎng)站建設,專注與成都網(wǎng)站設計、網(wǎng)站建設、H5建站、小程序制作等業(yè)務。10年已為寧鄉(xiāng)眾多企業(yè)、政府機構等服務。創(chuàng)新互聯(lián)專業(yè)網(wǎng)站制作公司優(yōu)惠進行中。
Perl基礎：利用Perl哈希表建立鍵－值數(shù)據(jù)映射
Perl的數(shù)據(jù)結構中最有趣的一個特性是Perl哈希表（hash），它使得在數(shù)據(jù)片段之間建立鍵—值（key-value）關聯(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');
上面的幾行用四對鍵—值關聯(lián)建立了一組PerlPerl哈希表?？梢宰⒁獾剑兞棵懊娴姆?表示它是一個Perl哈希表，箭頭用來指出鍵—值關系。
你也可以這樣寫代碼：
列表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;
輸出結果為：
Aisforapple.
要清除Perl哈希表，只需簡單地把它賦值于一個空的數(shù)據(jù)集，就像下面的例子：
列表D
- #!/usr/bin/Perl
- #(re)initializehash
- %alphabet=();
插入、改變和刪除Perl哈希表元素
你可以在一個Perl哈希表中插入一個新元素（或者更改一個現(xiàn)有的Perl哈希表），只需要給與之相對應的鍵設置一個新的數(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ù)結構中。你可以用函數(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ù)組）。這樣就為構建長而復雜的數(shù)據(jù)結構提供了很大的靈活性，下面是一個例子：
列表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]."";
該代碼返回的結果是：
BatmanfightsThePenguin
SupermanfightsLexLuthor
本文名稱：技術分享利用Perl哈希表建立鍵－值數(shù)據(jù)映射
轉載來于：http://www.5511xx.com/article/dhhchcj.html
