Perl 哈希Hash用法之入門教程
一、什么是Perl Hash
哈希是一種數據結構，和數組類似，可以將值存放到其中，或者從中取回值。但是，和數組不同的是，其索引不是數字，而是名字。也就是說，索引(這里，我們將它叫key)不是數字而是任意的唯一的字符串。
key可以是任意的字符串，你可以使用任何的字符串作為key，但它們是唯一的。
另一種思考hash 的方法是，把它看作一堆數據(a barrel of data)，每一個數據都有一個相應的標簽?？梢酝ㄟ^標簽訪問此標簽對應的元素。但其中是沒有“第一個”元素的概念的。在數組中，數組元素從0,Perl學習之哈希hash_馬亮的計算機技術1,2 開始編號。但在hash中，沒有確定的順序，因此也沒有第一個元素。只是一些key/value 對的集合。
keys和values均為任意的標量，但keys通常轉換為字符串。因此，如果將表達式50/20 作為keys，則其通常被轉換為3字符的字符串“2.5”。
由于Perl的“沒有不必要的限制”的設計哲學：hash可以是任意大小，從空hash(沒有key/value對)，到任何你內存允許的大小。
keys是唯一的，但values可以重復。hash的value可以是數字，字符串，undef，或者它們的混合，但key是唯一的。
為什么使用Perl Hash
可以把hash看作一個簡單的數據庫，其中每一個key下面可以有一塊數據。如果你的任務是關于：“查詢重復的”，“唯一的”，“交叉引用的”，“查詢表”，則hash很可能在這類應用中幫上Perl學習之哈希hash_馬亮的計算機技術你的忙。
二、Perl Hash元素的存取
要訪問hash 元素，可以使用下面的語法：$hash{$some_key}
這和訪問數組元素的方法有些類似，這里下標(key)上使用的是花括號({})，而不是方括號（[ ]）?，F在key 的表達式是字符串，而非數字。
hash的名字和Perl中其它的標識符的命名規(guī)則是一樣的(字母，數字，下劃線組成，但不能由數字開頭)。
訪問不存在的hash元素將得到undef。
1.作為整體的Perl Hash
要引用整個hash，使用百分號(%)作為前綴。
為了方便，hash可以轉換為列表，或者反過來。
2.Perl Hash賦值
可以使用如下的語法在hash 之間拷貝：
%new_hash = %old_hash;
將hash轉變成其它形式更加常見。例如，我們可以將hash反轉：
%inverse_hash = reverse %any_hash;
3.大箭頭符號(=>)
當給hash賦值時，有時并不明顯哪些元素是keys，那些是values，因此發(fā)明了大箭頭符號(=>)。在需要逗號的時候，都可以使用大箭頭符號替換。
如：
my %last_name = (
"www" => 1,
"eee" => 2,
);
三、Perl Hash函數
某些有用的函數可以對整個hash 進行操作。
1.keys和values函數
keys函數會返回此hash的所有keys，values函數將返回所有的values。如果hash中沒有元素，則此函數將返回空列表。
my %hash = ("a"=>1, "b"=>2, "c"=>3);
print my @k = keys %hash;
print my @v = values %hash;
2.each函數
如果想迭代hash的每一個元素，一種通常的方法是使用each函數，它將返回key/value對應的2個元素列表。
當對同一個hash 函數進行一次迭代時，將返回下一個key/value對，直到所有的元素均被訪問。如果沒有更多的key/value對，則each函數將返回空表。
my %hash = ("a"=>1, "b"=>2, "c"=>3);
while(($key, $value) = each %hash)
{
print "$key => $value\n";
}
當然，each返回的key/vlaue對，順序是混亂的(它其順序和keys和values函數返回的順序相同)。如果想將其按序排放，可以對它們排序（使用sort）。
my %hash = ("a"=>1, "b"=>2, "c"=>3, "d"=>4);
foreach $key (sort keys %hash)
{
$value =$hash{$key};
print "$key => $value\n";
}
四、Perl Hash的通常用法
1.exists函數
要查看hash中是否存在某個key，可以使用exists函數，如果hash中存在此key，則返回true，與是否有對應的value無關。
my %hash = ("a"=>1, "b"=>2, "c"=>3, "d"=>4);
if(exists $hash{'a'})
{
print "true";
}
2.delete 函數
delete函數將某個給定的key(包括其對應的value)從hash中刪除。如果不存在這個key,則什么也不做，不會有警告或者錯誤信息。
my %hash = ("a"=>1, "b"=>2, "c"=>3, "d"=>4);
delete $hash{'a'};
foreach $key (sort keys %hash)
{
$value =$hash{$key};
print "$key => $value\n";
}
3.Perl Hash 元素的內插
你可以在雙引號的字符串中使用單個hash元素，但不支持整個hash 的內插。
my %hash = ("a"=>1, "b"=>2, "c"=>3, "d"=>4);
foreach $key (sort keys %hash)
{
print "$key => $hash{$key}\n";
}
相關文章
這篇文章主要介紹了cpanm安裝及安裝Perl模塊教程,本文先是給出了cpanm的安裝教程,同時給出了Perl模塊的安裝實例,需要的朋友可以參考下2014-10-10
這篇文章主要介紹了Perl中的控制結構學習筆記,本文講解了條件語句if、條件語句unless、循環(huán)語句while、循環(huán)語句until、for循環(huán)、foreach語句、循環(huán)控制等內容,需要的朋友可以參考下2014-11-11
本文為大家介紹Perl中處理時間的幾個函數，供大家學習參考2013-02-02
這篇文章主要介紹了Perl學習筆記之文件操作,本文分別給出了打開文件、讀取文件、寫入文件代碼實例,需要的朋友可以參考下2015-06-06
今天小編就為大家分享一篇關于perl6垃圾收集的文章，小編覺得內容挺不錯的，現在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧2018-10-10
這篇文章主要介紹了Perl AnyEvent中的watcher實例,關于AnyEvent請參閱的更多介紹請參閱文中的相關鏈接,需要的朋友可以參考下2014-09-09
Perl使用File::Basename獲取文件擴展名的代碼
本文為大家介紹的這個例子，實現了獲取/home/topgkw中所有文件后綴，其中目錄返回空值2013-02-02
這篇文章主要介紹了perl AnyEvent簡單介紹和入門知識,AnyEvent 是一個性能非常好的基于事件驅動的框架,需要的朋友可以參考下2014-09-09
在Perl排名持續(xù)下降的情況下學Perl，似乎是有點不明智。但是，工作需要，不得不學啊。再說，Perl現在在測試領域還是用得非常多的。Phython雖然也在測試領域開始活躍起來，不過我始終還是不太喜歡Phython的語法。2009-04-04
怎么用perl程序，隨機生成一條序列，使ACGT四種堿基的含量分別為0.3，0.3，0.2，0.2！2013-03-03