Verarbeiten von Textdatenbanken (schreiben, editieren und löschen)
In eine Datei schreiben ist leicht, schwieriger ist es da schon an die Dateiinhalte heranzukommen um diese sicher zu editieren, zu aktualisieren oder zu löschen. Ich werde hier einige Praxisbezogene Beispiele vorstellen, die sich mit der Problematik befassen.
1. In eine Datei schreiben
Grundsätzlicher Aufbau
Öffnet man eine Datei mit >> bedeutet dass das hier die Daten am Dateiende angehängt werden. Hiermit > wird die Datei hingegen überschrieben.
open (FILE, ">>$dateipfad/daten.dat") or scripterror("Fehler: Kann daten.dat nicht oeffnen!",$!);
flock (FILE, 2);
print FILE "$id|$email|$url|$namen";
close FILE;
Wenn man von vornherein plant die Dateiinhalte später editieren oder löschen zu wollen ist es eine gute Idee eine eindeutige ID für jede Zeile zu vergeben. Dies kann eine Kombination von Zufallszeichen, die Zeit, ein Counterwert oder ähnliches sein. Mit dieser ID ist dann eine eindeutige Zuordnung leicht herzustellen.
Eine Zeile aus einer Datei löschen
Grundsätzlicher Aufbau
open (DATEN, "+>>$dateipfad/daten.dat") or scripterror("Fehler: Kann daten.dat nicht oeffnen!",$!);
flock (DATEN, 2);
seek DATEN, 0, 0;
my @daten = <DATEN>;
my @neue_daten = ();
foreach $daten (@daten) {
chomp $daten;
($eintragsid,$email,$url,$name) = split(/|/, $daten);
if ($eintragsid ne $id) {
$daten = "$datenn";
push @neue_daten, $daten;
}
}
seek DATEN, 0, 0;
truncate DATEN, 0;
print DATEN @neue_daten;
flock (DATEN, 8);
close DATEN;
Wie funktioniert’s?
Hier wird die Datei zum Aktualisieren geöffnet, dann der Dateizeiger mittels seek DATEN, 0, 0; an den Anfang der Datei gesetzt.
Nun wird ein neues, leeres Array definiert mit my @neue_daten = ();
In der nachfolgenden foreach Schleife foreach $daten (@daten) { werden die Dateizeilen durchlaufen und das n am Zeilenende mittels chomp $daten; entfernt.
Dem schließt sich das splitten der Zeilen an
($eintragsid|$email|$url|$name) = split(/|/, $daten);.
In dem Codeblock:
if ($id ne $eintragsid) {
$daten = "$datenn";
push @neue_daten, $daten;
}
werden nun die Dateiinhalte die nicht (ne) mit der ID übereinstimmen in das neue Array ge“push“t.
Nun wird der Dateizeiger wieder an den Dateianfang positioniert, der Dateiinhalt komplett gelöscht mit truncate DATEN, 0; und der Inhalt des Arrays in die Datei print DATEN @neue_daten; geschrieben.
Weitere Beiträge
Amazon-Vergleichstabellen erhöhen die Affiliate-Einnahmen
Amazon-Vergleichstabellen: Wer im Internet kaufen will, vergleicht zunächst Preise und Produkteigenschaften. Hier ist bei vielen Interessenten Amazon die erste Wahl. Gleichzeitig bietet der Branchenriese ein interessantes Partnerprogramm für Empfehlungen an. Wer sich damit ein zusätzliches Einkommen sichern möchte, bietet seinen Besuchern spezielle Amazon-Vergleichstabellen auf seiner Webseite an. So findet der Kunde schneller die relevanten Informationen […]
Amazon startet den 10. Prime Day am 16. und 17. Juli
Prime Day 2024: Vom 16. bis 17. Juli haben Prime-Mitglieder exklusiven Zugang zu einer Vielzahl von Angeboten in verschiedenen Kategorien wie Bekleidung, Elektronik, Küche & Haushalt und Spielzeug. Neue Deals werden während des gesamten Zeitraums veröffentlicht, um Prime-Mitgliedern am zehnten Prime Day stets etwas Neues zu bieten. Die ersten Angebote sind bereits verfügbar. Weitere Produkte […]
Amazon Oster-Angebote – erste Angebote sind verfügbar
Amazon Oster-Angebote: Ostern steht vor der Tür. Eine gute Gelegenheit, um die Wohnung oder den Arbeitsplatz bunter zu gestalten. Auch der Frühjahrsputz steht vor der Tür. Die Amazon Osterangebote vom 20. bis 25. März bieten attraktive Rabatte auf Elektronik, Haus & Garten, Spielwaren und mehr. Schneller Versand inklusive! Die ersten Angebote sind bereits verfügbar – […]
Das neue MacBook Air 2024 mit M3 Chip bei Amazon
MacBook Air 2024. Apple präsentierte überraschend die neuen MacBook Air Modelle mit dem leistungsstarken M3 Chip. Neben der besseren Hardware, die deutlich schneller ist als die Rechner der Konkurrenz, wurde vor allem die Tatsache begrüßt, dass das Macbook endlich mit zwei externen Monitoren funktioniert. Erfreulich ist, dass die neuen MacBooks bereits bei Amazon bestellt werden […]
Keine Kommentare vorhanden