Perl_哈希数组_$hash{$key}[0]

Perl_哈希数组_$hash{$key}[0]

 

my $key="A";
my $two=1;
my $three=2;
my $four=3;
my $five=4;
my $six=5;
my %hash;

$hash{$key}[0]=$two;
$hash{$key}[1]=$three;
$hash{$key}[2]=$four;
$hash{$key}[3]=$five;
$hash{$key}[4]=$six;

print $hash{$key}[0]."\t".$hash{$key}[1]."\t".$hash{$key}[2]."\t".$hash{$key}[3]."\t".$hash{$key}[4]."\n";