我如何在Perl中表示集合?

我想代表一组在Perl。我通常做的是使用一个带有一些虚拟值的哈希,例如:
my %hash=();
$hash{"element1"}=1;
$hash{"element5"}=1;

然后使用if(defined $ hash {$ element_name})来决定元素是否在集合中。

这是一种常见的做法吗?有什么建议改善这个?

此外,我应该使用defined还是exists?

谢谢

解决方法

使用CPAN上的许多设置模块之一。从你的例子来看, Set::LightSet::Scalar似乎是合适的。

我可以用CPAN(忽略可能的协同效应)的通常的论据来保护这个建议。

>我们如何知道,现在和未来都需要查找?经验告诉even the simplest programs expand and sprawl.使用模块会预期到。
>对于维护来说,一个API是更好的,或者一般需要阅读和理解代码的人,比一个特别的实现,因为它允许在不同的抽象层次考虑部分问题。
>相关的,如果事实证明开销是不受欢迎的,很容易从一个模块去简单通过消除indirections或配对数据结构和源代码。但是另一方面,如果需要更多的特征,则相反更难实现。
> CPAN模块已经过测试,并在一定程度上彻底调试,也许API在一段时间内经历了改进步骤,而使用ad hoc-programmers usually implement the first design that comes to mind

很少事实证明,在开始挑选一个模块是错误的选择。

相关文章

1. 如何去重 #!/usr/bin/perl use strict; my %hash; while(...
最近写了一个perl脚本,实现的功能是将表格中其中两列的数据...
表的数据字典格式如下:如果手动写MySQL建表语句,确认麻烦,...
巡检类工作经常会出具日报,最近在原有日报的基础上又新增了...
在实际生产环境中,常常需要从后台日志中截取报文,报文的形...
最近写的一个perl程序,通过关键词匹配统计其出现的频率,让...