免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2027 | 回复: 8
打印 上一主题 下一主题

有个关于哈希的问题 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2010-10-14 00:07 |只看该作者 |倒序浏览
for(sort { $DTQ{$b} <=> $DTQ{$a} } keys(%DTQ))
这个<=>及其左右哈希变量的用法,百思不得其解,求高手赐答!

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
2 [报告]
发表于 2010-10-14 07:17 |只看该作者

论坛徽章:
1
未羊
日期:2014-09-08 22:47:27
3 [报告]
发表于 2010-10-14 08:25 |只看该作者
本帖最后由 wxlfh 于 2010-10-14 10:37 编辑
for(sort { $DTQ{$b}  $DTQ{$a} } keys(%DTQ))
这个及其左右哈希变量的用法,百思不得其解,求高手赐答!
jayamge 发表于 2010-10-14 00:07



    对散列%DTQ的key按其值逆序排列。
举个例子:
  1. use strict;
  2. my %DTQ = (1=>'A',3=>'C',2=>'B');
  3. my @arr = sort {$DTQ{$b} cmp $DTQ{$a}} keys %DTQ;
  4. #现在@arr中的值为 3,2,1
复制代码

论坛徽章:
1
未羊
日期:2014-09-08 22:47:27
4 [报告]
发表于 2010-10-14 08:31 |只看该作者
对了,你应该去看看 sort 的用法。

论坛徽章:
0
5 [报告]
发表于 2010-10-14 09:41 |只看该作者
本帖最后由 珞水的大叔 于 2010-10-14 09:42 编辑

回复 3# wxlfh


    兄弟,你的代码里面有两个小瑕疵
    第二行应该是用小括弧赋值:
  1. my %DTQ = (1=>'A',3=>'C',2=>'B');
复制代码
第三行,因为sort比较的是value,而value是字符串不是数字,所以需要使用cmp而非<=>:
  1. my @arr = sort {$DTQ{$b} cmp $DTQ{$a}} keys %DTQ;
复制代码

论坛徽章:
46
15-16赛季CBA联赛之四川
日期:2018-03-27 11:59:132015年亚洲杯之沙特阿拉伯
日期:2015-04-11 17:31:45天蝎座
日期:2015-03-25 16:56:49双鱼座
日期:2015-03-25 16:56:30摩羯座
日期:2015-03-25 16:56:09巳蛇
日期:2015-03-25 16:55:30卯兔
日期:2015-03-25 16:54:29子鼠
日期:2015-03-25 16:53:59申猴
日期:2015-03-25 16:53:29寅虎
日期:2015-03-25 16:52:29羊年新春福章
日期:2015-03-25 16:51:212015亚冠之布里斯班狮吼
日期:2015-07-13 10:44:56
6 [报告]
发表于 2010-10-14 10:16 |只看该作者
是用 cmp 还是 <=> 这个完全看需求啊,毕竟字符序和数字序不完全一样,况且他举的例子里面键全是数字,反正perl会自动转换的

论坛徽章:
1
未羊
日期:2014-09-08 22:47:27
7 [报告]
发表于 2010-10-14 10:35 |只看该作者
本帖最后由 wxlfh 于 2010-10-14 10:36 编辑

回复 5# 珞水的大叔


    对头,不是小瑕疵,而是大Bug。那个花括号吧,最近在看JavaScript的书,搞混了,悲哀啊。

谢谢指出错误,我疏忽了,误人子弟啊。

论坛徽章:
0
8 [报告]
发表于 2010-10-14 11:03 |只看该作者
回复 7# wxlfh


    语言看多了,大家都有混乱的时候,嘿嘿
   共勉共勉

论坛徽章:
0
9 [报告]
发表于 2010-10-16 21:44 |只看该作者
路过,学习中
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP