<loop code=perl>
out "<td>Name: $Name<br>";
out "Ort: $Ort<br>" if $Ort ne "";
out "Tel.: $Telefon<br>" if $Telefon ne "";
out "Fax: $Fax<br>" if $Fax ne "";