my %hash = map { chr $_ => $_ } 32 .. 126;