for my $ip ( keys %masterhash ){
 print "$ip ", join (" ",keys %{$masterhash{$ip}}),"\n";
}