my %hash = map { chomp; $_ => undef } <DATA>;