$href = \%drw;
foreach ( keys %$href) {
  print "primaryKey = $_\n";
  foreach ( values %{$href->{$_}}) { 
	print "\tsubKeyValue = $_\n";
  }
}