txt datenbank auslesen und verarbeiten
Marcus Vieß
- perl
0 Auge
Ich möchte eine textdatei auslesen und verarbeiten.
Die datei sieht so aus :
1|Nachtschatten|test1|http://www.balbalbla.de
2|Vampires|test2|http://www.niknak.de
3|Nosferatu|test3|http://www.zappzerapp.de
ich möchte jetzt eine htmlseite ausgeben nach namen des Films sortiert haben, und mit "<a href" link zum anklicken.
ich bekomme das ganze eingelesen und habe alles in einer Var aber ich bekomme nicht sortiert nach "feld 2" geschweige den eine ausgabe:
Nachtschatten
Nosferatu
Vampires
mit klickbaren links hin.
Bis jetzt jetzt sieht das so aus :
open(DB, "linksdata.txt") || die "Kann Datei nich öffnen!";
flock (DB, 2);
@liste = <DB>;
close(DB);
foreach $zeile (sort @liste) # Gehe der Reihe nach durch @liste und nenne das Element $zeile
{
print "$zeile\n<br>"; # Ausgabe des Elementes
}
Hallo
Ich kenne mich zwar nur einigermaßen in PHP aus, aber ich denke,
daß die Funktionen vergleichbar sind.
open(DB, "linksdata.txt") || die "Kann Datei nich öffnen!";
flock (DB, 2);
@liste = <DB>;
close(DB);
foreach $zeile (sort @liste) # Gehe der Reihe nach durch @liste und nenne das Element $zeile
{
print "$zeile\n<br>"; # Ausgabe des Elementes
}
in PHP würde ich das (zum Vergleich) halt so machen:
$liste = file("linksdata.txt");
//Einlesen der Datei in ein Array
for($a=0;$a<count($liste);$a++)
// zeilenweise Schleife von Element 0 bis zum Ende der Datei
{
$zeile = explode("|",$liste[$a]);
// Zerlegen der Zeile in die einzelnen Felder und überführen in ein Array
print "<a href="".$zeile[2]."">".$zeile[0]."</a>";
// $zeile[2] = Linkziel, $zeile[0] = Titel
}
Ich hoffe, daß das, trotz anderer Sprache, zum Verständnis beiträgt.
Tschö, Auge