Re^2: Need Set-like Regex for Perl and Java (golf OK)

You could initialize your %elements has quite a bit more easily:

my @set = ('A000','A123'..'A456','A999'..'B000','B789'..'B888');
my %elements;
@elements{@set} = (undef)x@set;
[download]

The PerlMonk tr/// Advocate

Comment on Re^2: Need Set-like Regex for Perl and Java (golf OK) Download Code