in reply to Re: Need Set-like Regex for Perl and Java (golf OK)
in thread 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;

The PerlMonk tr/// Advocate