main::(/usr/local/nagios/create_maps.pl:68):
68:           my  $host = Host2->new($hostname,  $net,  $parents);
  DB<3> n
main::(/usr/local/nagios/create_maps.pl:70):
70:            $hosts{$hostname} =  $host;
  DB<3> p $hostname
Rechner03
  DB<4> p $host
Host2=HASH(0x83b4a9c)
  DB<5>