if ($x eq $y)    {print $fh{$x} @{ $testhash{$y}};}