A faster way to produce %hasIndex is:

my %hasIndex;
undef(@hasIndex{@a_indices});
[download]

However I wouldn't recommend using that trick in production code.