Perl语言入门--5--散列、hash

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　hash

一、关联数组的形式

　　%h=('a',1,'b',2);         a是key 1是value    b是key  2是value

　　　　以%开头，()为空散列

　　%h=('a'=>1,'b'=>2);    更明显一些 用这个还可以省略引号  但默认全部都是字符串  当有数字的时候就不是你的本意了

　　元素形式：$h{'a'}       #注意用$

　　元素为简单变量，用$。 %h{2.5}  %{-1}  ${$ee} 都是可以的 小数  负数  简单变量都可以是key

 

二、 关联数组的赋值

　　1、标准:  %a=('a',1,'b',2);

　　2、数组与散列间赋值：%h=@a   散列也是数组 只是没有顺序

　　3、@a=%h  数组元素的顺序随机

　　4、($a,%h)=@array   #不太会用  先把数组的第一个值放进简单变量$a中 再把剩下的放进散列%h中  ，所以@array的个数必须是奇数

　　5、%h=(%first,%second)  #浪费内存

　　6、%h1=(%h2,'k','v')       #增加一组键值，必须成对出现

　　7、函数的返回，比如split()的返回结果，也可以赋值给散列：

　　　　　　　　　　%h=split(/,/,'a,b,c,d')

　　8、片段：@key=('a','b','c')

　　　　　　  @hash{@keys}=@hash{reverse(@keys)}

　　　　　　　　#注意@不能改为$，因$hash{}中key要求是简单变量，所以括号里面是一个数

　　　　　　　　　　　　　　　　　而现在我想圈出一个数组，所以前面要变为@，括号里面也是@

　　　　　　　　　　　　　　　　　都应该前后对应

　　　　　　　　　　　　　　　　　如果你输入 $hash{@keys} 因为$hash大括号中的key要求是简单变量   这等同于 $hash{@keys的长度} 也就是@hash{3}

三、 元素赋值与操作

　　1、增加： $h{'a'}  =  1   不存在则创建，hash不存在也创建

　　2、删除：delete $h{'a'}

　　3、不要用push pop shift splice 等与顺序有关的函数，否则结果不可知

　　4、显示：不能  print "%hash";   这样输出的只是字符串：%hash

　　　　　　  如用  print %hash  则显示无空格

　　　　　　   用遍历的方法来逐一显示

　　5、$a=%hash  $a被赋值为x    x是已有的元素数/分配的内存数   没什么卵用

四、关联数组操作函数

　　key(%h) 或 key %h                  #返回键列表       

　　value(%h) 或 value %h  　　　#返回值列表       

　　

　　each(%h)循环：　　($key,$value)=each(%hash)

　　　　　　循环中不要增加或删除元素，因为散列是无序的。循环的最后返回undef

　　exist：查看关键字是否存在

　　　　　　exist $h{'key'}

　　undef(%h) : 删除散列 相当于%=()

　　delete