kabel@linux:~> perl -w -MSet::Scalar
my $some_ints = '{1 .. 4}';
my $other_ints = '{3 .. 8}';
my $all_ints = $some_ints + $other_ints;

print '[', join( ', ', sort $all_ints->members ), "]\n";
print $Set::Scalar::VERSION, " ", $], $/;

[1, 2, 3, 4, 5, 6, 7, 8]
1.17 5.008
kabel@linux:~>