在线咨询
eetop公众号 创芯大讲堂 创芯人才网
切换到宽版

EETOP 创芯网论坛 (原名:电子顶级开发网)

手机号码,快捷登录

手机号码,快捷登录

找回密码

  登录   注册  

快捷导航
搜帖子
查看: 8698|回复: 10

请教perl中定义了hash后该怎么写print函数?

[复制链接]
发表于 2009-8-25 19:42:29 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

x
程序如下:

   my %hash;
   for (1...5)   {

         $hash{$_*=2} = $_**2;
   }

如果想要得到如下格式的结果:
$hash{2} = 1
$hash{4} = 4
$hash{6} = 9
$hash{8} = 16
$hash{10} = 25

应该怎么写  print 函数呢?
发表于 2009-8-26 10:28:07 | 显示全部楼层
foreach $index( sort{ $hash{$a} <=> $hash{$b} } keys(%hash) ) {
      print "\$hash{$index} = $hash{$index}\n";
}
发表于 2009-8-26 11:40:33 | 显示全部楼层
 楼主| 发表于 2009-8-26 18:13:55 | 显示全部楼层
谢谢啦
发表于 2009-8-27 00:01:15 | 显示全部楼层
我也想要呀,呵呵
头像被屏蔽
发表于 2009-8-28 01:48:50 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2009-8-28 22:37:01 | 显示全部楼层
又学一招了。
发表于 2009-9-2 17:01:07 | 显示全部楼层
map {printf '\$hash{%d} = %d\n', $_,  $hash{$_} } keys %hash;
头像被屏蔽
发表于 2009-9-2 21:26:54 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2009-9-3 00:03:44 | 显示全部楼层
嗯,是呀,我也想知道一下呀
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

站长推荐 上一条 /2 下一条

×

小黑屋| 手机版| 关于我们| 联系我们| 在线咨询| 隐私声明| EETOP 创芯网
( 京ICP备:10050787号 京公网安备:11010502037710 )

GMT+8, 2024-11-25 21:28 , Processed in 0.037159 second(s), 10 queries , Gzip On, Redis On.

eetop公众号 创芯大讲堂 创芯人才网
快速回复 返回顶部 返回列表