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