my %results = map { if ( $low_watermark < $_ && $_ < $high_watermark ) { $_ => 1 } else { () } } @all_numbers;