perl 怎么增加hash键值对

Question

就是哈希之前已经定义了，然后现在需要再增加一些键值对，怎么输入？
比如通过某个循环得到一个key和一个value，怎么把这一对加进去？

另外最好再回答下怎么对hash的values进行排序，得到的结果存进另一个数组

Answer 1

呃，没大明白，增加键值对，意思是这样么：
my %hash = (1,2,3,4); #初始化
my $key = 'a';
my $value = 'b';
$hash{$key} = $value; #说的是这个？

对哈希的values进行排序， my @sort_values = sort(values %hash);

Answer 2

就这样加上去就好...

%h = ( A=>'a', B=>'b' ) ;
foreach ( 'C' .. 'Z' ) {
$h{$_} = lc $_; # Key = Value
}
print "$h = $h{$_}" foreach sort keys %h;

@order = sort values %h; # 如果你的 values 是文字
@order = sort {$a<=>$b} values %h; # 如果你的 values 是数字

@rev_order = reverse sort values %h ; # 文字 + 反序
@rev_order = sort {$b<=>$a} values %h ; # 数字 + 反序