免费注册 查看新帖 |

ChinaUnix.net

  平台 论坛 博客 文库 频道自动化运维 虚拟化 储存备份 C/C++ PHP MySQL 嵌入式 Linux系统
最近访问板块 发新帖
查看: 2677 | 回复: 4

多维哈希中key的exists的判断 [复制链接]

论坛徽章:
0
发表于 2014-09-30 15:58 |显示全部楼层
my %hash;
print "exists!\n" if exists $hash{1};
print "exists!\n" if exists $hash{1}{2}{3};
print "exists!\n" if exists $hash{1};

第三次打印的时候,$hash{1}就存在了,这可能会造成一些问题。
怎样避免这样的情况的发生呢

论坛徽章:
6
丑牛
日期:2014-03-21 15:42:04子鼠
日期:2014-04-12 11:50:17处女座
日期:2014-09-01 09:25:1115-16赛季CBA联赛之吉林
日期:2015-12-22 14:01:5215-16赛季CBA联赛之广东
日期:2016-03-08 18:49:422016科比退役纪念章
日期:2016-07-06 12:19:55
发表于 2014-09-30 16:45 |显示全部楼层
{:3_184:}
  1. no autovivification;
  2. print "exists!\n" if exists $hash{1};
  3. print "exists!\n" if exists $hash{1}{2}{3};
  4. print "exists!\n" if exists $hash{1};
复制代码

论坛徽章:
8
技术图书徽章
日期:2013-08-22 11:21:28未羊
日期:2015-01-19 22:22:25巳蛇
日期:2014-08-11 16:53:08子鼠
日期:2014-05-29 09:04:44摩羯座
日期:2014-04-11 14:15:07丑牛
日期:2014-01-24 12:41:28金牛座
日期:2013-11-21 17:38:28射手座
日期:2015-01-21 08:50:32
发表于 2014-09-30 17:22 |显示全部楼层
回复 1# 塞图宝
  1. cat t.pl

  2. my %hash;
  3. print "1exists!\n" if exists $hash{"1"};
  4. print "2exists!\n" if exists $hash{"1"}{"2"}{"3"};
  5. print "3exists!\n" if exists $hash{"1"};
  6. print "4exists!\n" if exists $hash{"1"}{"2"};
  7. print "5exists!\n" if exists $hash{"1"}{"2"}{"3"};
  8. --------------------

  9. perl t.pl

  10. 3exists!
  11. 4exists!
复制代码

论坛徽章:
0
发表于 2014-10-01 05:27 |显示全部楼层
本帖最后由 塞图宝 于 2014-10-01 05:27 编辑

回复 2# stanley_tam


    太感谢了!这个方法很好!

论坛徽章:
0
发表于 2014-10-01 05:27 |显示全部楼层
回复 3# huang6894


    谢谢了!
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP