perl - Perl 中的哈希集

Question

考虑以下代码:

$inFilesToCopy{$filename} = $filename;

我有一个哈希表，其中键和值都是文件名。我想避免使用额外的内存，并且不存储文件名两次。

Perl中有集合对象吗？

Answer 1

Set::Object作为你会期望:

use Set::Object qw(set);

my $files = set();
$files->insert($file);
my @files = $files->members();

您还可以进行集合数学计算:

my $a = set();
$a->insert(...);

my $b = set();
$b->insert(...);

my $only_in_a = $a - $b;
copy_to_b($only_in_a->members);