4.3.5 values

取出雜湊的值,傳回一個陣列

#! /usr/bin/perl

%A=("m", 1, "n", 5, "g", 2, "p", 9);

print '雜湊 %A 的值有: ';

foreach (values %A) {
	print "$_ ";
}

# 輸出:雜湊 %A 的值有: 9 5 2 1