perl 怎么增加hash键值对
就是哈希之前已经定义了,然后现在需要再增加一些键值对,怎么输入?比如通过某个循环得到一个key和一个value,怎么把这一对加进去?另外最好再回答下怎么对hash的val...
就是哈希之前已经定义了,然后现在需要再增加一些键值对,怎么输入?
比如通过某个循环得到一个key和一个value,怎么把这一对加进去?
另外最好再回答下怎么对hash的values进行排序,得到的结果存进另一个数组 展开
比如通过某个循环得到一个key和一个value,怎么把这一对加进去?
另外最好再回答下怎么对hash的values进行排序,得到的结果存进另一个数组 展开
展开全部
就这样加上去就好...
%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 ; # 数字 + 反序
%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 ; # 数字 + 反序
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询