my %myhash = ( key1 => { map {$_ => 1} qw(abd bcd cde def efg) }, key2 => { map {$_ => 1} qw(abd def} }, key3 => { map {$_ => 1} qw(efg cde tgh) }, );