- Aus einer Textdatei werden eine Reihe von Datansaetzen gelesen,
die wie folgt geordnet sind:100000001ein beliebiger text1999
100000002ein anderer text1998usw.
Aus jedem der Datensaetze sollen die ""s entfernt werden und für
jeden Teil eines Datensatzes soll ein bestimmtes HTML-Element
geprintet werden.Der vom Perl-Script erzeugte HTML-Code sollte in etwa so aussehen:
<html>
...
...
<table>
<tr><td>100000001
ein beliebiger text1999</td></tr>
<tr><td>100000002
ein anderer text1998</td></tr>
</table>
...
Hi,
mit nachfolgendem Code kannst Du die einzelnen Teile extrahieren (stehen in $1, $2, $3). Damit kannst Du dann mit print-Anweisungen Deine Seite generieren.
open DATEI ,"d:/temp/dat";
while ($inp=<DATEI>){
$inp=~ /(.*)(.*)(.*)/;
#in $1 $2 $3 steht dann z.B. 100000002 ein Text 1999
}
close DATEI;
Gruß
Timothy