if ( $ret{$value1} eq $out{$key} ){
      print "$ret{$key1}:$ret{$value1}:$out{$value}\n";
}