perl 另一種 hash 表示方式

use strict;

my $ph = {age => 47, eyes => ‘brown’, weight => 168};

print $ph;

得到 HASH(0x8825c20)

就可以知道 $ph 是一個 hash

再來可以
my %hash = %$ph 把它表示成 hash

print $hash{age} 就可以得到 47

或者直接

print $ph->{age} 也可以得到 47