print qq~<tr>
            <td>$ptr->{doctyp}</td>
            <td>$ptr->{docname}</td>
            <td>$ptr->{head}</td>
            <td><a href="$SCRIPT?auswahl=1;identnr=$identnr;docname=$ptr->{docname}">Auswählen</a></td>
        </tr>~;