Perl – Platzhalter in Textstrings ersetzen
Dieses Codebeispiel zeigt wie man in Textstrings, die mit speziellen Platzhaltern durchsetzt sind, Werte aus dem Script einfügen kann.
Codebeispiel mit Erläuterungen
Ausgangssituation:
Es gibt in der Datenbank oder einer Sprachdatei im Textformat abgelegte Texttausgaben. Nun kann es aber sein, das man in diese Textausgaben vom Script generierte Daten einfügen möchte. Hierzu sind zunächst Platzhalter in den Textstring einzufügen, Siehe Beispiel:
$platzhaltertxt = 'Das ist <%1%> aus <%2%> in <%4%>. <%2%> ist eine Stadt im <%3%>.';
Diese Platzhalter sollen nun mit diesen Werten gefüllt werden, diese könnten hier z.B. aus einer Mitgliederdatenbank stammen und als Profilausgabe genutzt werden.
Helmut, Brand-Erbisdorf, Erzgebirge, Sachsen
Wie aus dem Plathaltertext ersichtlich gibt es hier zweimal den Platzhalter mit der Nr. 2 aber nur 4 Werte die an die function zum parsen der Textstrings übergeben werden. Um die Werte später voneinander zu trennen sind diese im Subroutinenaufruf mit einem Trennzeichen | verbunden.
Der Subroutinenaufruf:
print insert_text_vars($platzhaltertxt, "Helmut|Brand-Erbisdorf|Erzgebirge|Sachsen");
In der Subroutine selbst prüft man nun zuerst ob überhaupt Platzhalterdaten übergeben wurden. Wenn ja, in Array zerlegen mittels split und die Anzahl an Arrayelementen ermitteln.
my $anzahl = 0;
if ($ersatz ne '') {
@insert = split(/\|/, $ersatz);
unshift(@insert, '');
$anzahl = @insert;
}
Wurde eine Anzahl > 0 festgestellt wird der eigentliche Parserblock aufgerufen. Dieser ersetzt hier die Zahlen des Platzhalters mit dem passenden Arrayelement.
if ($anzahl > 0) {
$text =~ s/<%([0-9])%>/$insert[$1]/sg;
}
über
return $text;
erhält man nun die Ausgabe:
„Das ist Helmut aus Brand Erbisdorf in Sachsen. Brand-Erbisdorf ist eine Stadt im Erzgebirge.“
Hier das komplette Script:
#!/usr/bin/perl
#Fehlerausgabe an Browser
use CGI::Carp qw(fatalsToBrowser);
use strict;
print "Content-type: text/html\n\n";
my $platzhaltertxt = 'Das ist <%1%> aus <%2%> in <%4%>. <%2%> ist eine Stadt im <%3%>.';
print insert_text_vars($platzhaltertxt, "Helmut|Brand-Erbisdorf|Erzgebirge|Sachsen");
sub insert_text_vars {
my $text = shift || '';
my $ersatz = shift || '';
my (@insert);
my $anzahl = 0;
if ($ersatz ne '') {
@insert = split(/\|/, $ersatz);
unshift(@insert, '');
$anzahl = @insert;
}
if ($anzahl > 0) {
$text =~ s/<%([0-9])%>/$insert[$1]/sg;
}
return $text;
}
Hier das selbe Script noch einmal, aber als PHP Version
Weitere Beiträge
Amazon Prime Deal Days: Günstige Hardware-Angebote für Technikfans
Amazon bietet während der Prime Deal Days besonders günstige Hardware an. Das beliebte Shopping-Event läuft vom 8. bis 9. Oktober. Prime-Mitglieder dürfen sich auf exklusive Rabatte und Angebote freuen. Besonders Technikfans kommen in diesen zwei Tagen voll auf ihre Kosten.
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 – […]
Keine Kommentare vorhanden