在Perl中，如何创建其键来自给定数组的哈希？
假设我有一个数组，而且我知道我会做很多“该数组是否包含X？” 检查。执行此操作的有效方法是将数组转换为哈希，其中的键是数组的元素，然后您可以说
if（$ hash {X}）{...} 有没有简单的方法可以执行此数组到哈希的转换？理想情况下，它应该足够通用以接受匿名数组并返回匿名哈希。 问题来源于stack overflow
展开
收起
1
条回答
写回答
写回答
-
%hash = map { $_ => 1 } @array; 它不如“ @hash {@array} = ...”解决方案那么短，但是那些解决方案要求哈希和数组已经在其他地方定义，而该解决方案可以采用匿名数组并返回匿名哈希。
这是将数组中的每个元素都与“ 1”配对。当此（键，1，键，1，键1）对的列表分配给哈希时，奇数的键成为哈希的键，而偶数的键成为各自的值。
2020-02-08 19:11:51赞同 展开评论 打赏
版权声明：本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。
相关问答
