神奇的Perl-哈希与数组(3)
声明：本神奇的Perl系列为刘兴(http://deepfuture.iteye.com/)原创，未经笔者授权，任何人和机构不能转载1. 哈希内嵌数组
语法格式如下：
声明及定义
my %哈希变量=(
哈希键1=>[数组元素1，数组元素2，…，数组元素n],
哈希键2=> [数组元素1，数组元素2，…，数组元素n],
…..
……
哈希键n=> [数组元素1，数组元素2，…，数组元素n]
);
访问内嵌数组的单个元素：
$哈希变量名{哈希键}->[数组下标]
访问内嵌数组：
@{$哈希变量名{哈希键}}
例如，游戏地图上有一组建筑物的坐标，分别如下：
武器店：123，35
修练场：85，196
防具店：67,96
魔法店：128,45
用哈希内嵌数组的方式来存储和访问这些数据。
1） 存储
my %game=(
“武器店”=>,
“修练场”=>,
“防具店”=>,
“魔法店”=>
);
2） 访问
访问防具店的坐标值:
printf ("%d,%d",@{$game{"防具店"}});
访问魔法店的坐标Y值：
print $game{“防具店”}->;
可使用硬引用符来完成内嵌数组的赋值。
my %game;
my @array=(123,35);
$game{"武器店"}=\@array;
my @array=(85,196);
$game{"修练场"}=\@array;
my @array=(67,96);
$game{"防具店"}=\@array;
my @array=(67,96);
$game{"魔法店"}=\@array;
printf ("%d,%d",@{$game{"防具店"}});
页:
[1]