Or else you might change what you put into the hash:

  my %isthere = map { sprintf ('%05d',$_) => 0 } ($low..$high);
[download]

Assuming that all numbers you want to check are in the same format...

pike