my @inner_loop = &fetch_contact($eid);
  my %row = (
             firma 		=> $firma,
             strasse 	=> $strasse,
             plz 		=> $plz,
             ort 		=> $ort,
             contact_loop => \@inner_loop
            );