|
|
|
20.12.2007
until in Perl
The until-command repeats a block, until a expression is true.
A simple example:
Weiterlesen...
15.12.2007
Eine nette kleine RegEx
Ich bin gerade die Tage über eine kleine, nette RegEx gestolpert, die zwar nichts weltbewegendes ist, die ich aber trotzdem erwähnenswert finde.
Und zwar ging es wieder mal darum, aus einer Website einen Link zu extrahieren.
Die folgende kleine Regex holt dann zum Beispiel den href-Teil aus dem <a...>-Tag:
my $link=qq~<a href="test.htm" target="_blank">Ein Link</a>~;
if ($link=~ / href\=([\"\']*)(.*?)\1[\s\/>]/is) {
$ergebnis =$2;
}
else
{
$ergebnis='Kein Link da';
}
print $ergebnis;
|
Weiterlesen...
11.12.2007
rindex - Zeichenketten "von rechts" durchsuchen
Also bei index haben wir ja schon gesehen, daß Zeichenketten vom Anfang an (von links) durchsucht werden, und falls vorhanden, die Position zurückgegeben wird.
rindex macht dies nun von der anderen Seite her, nämlich von hinten bzw. von rechts.
Weiterlesen...
11.12.2007
Nochmal Links testen - mein Modul für Perl
Also ich habe mich ja schon öfters über das Testen von Links auf Webseiten ausgelassen. Da ich anscheinend einen Server habe, der weder das Modul Scraper noch WWW::Mechanize bereithält, bleibt mir eben nichts anderes übrig, als selbst mal wieder in die Tasten zu greifen und mir ein Modul zu schreiben, das Webseiten bzw. in Dateien gespeicherte Webseiten nach Links abgrast und mit alle Parameter der Links bereitstellt.
Herausgekommen ist das Modul, das hier heruntergeladen werden kann. Falls man es benutzen möchte, einfach in das cgi-bin-Verzeichnis kopieren und die Rechte auf 0755 setzen.
Und was kann das Modul?
Also:
Weiterlesen...
6.12.2007
Google Sitemaps - Script zur Erstellung einer Sitemap-Datei für Google
Googles Sitemaps sollen helfen, daß einzelne Webseiten von Google auch dann gefunden werden, wenn sie nirgends verlinkt sind. Dies ist dann wichtig, wenn man häufig wechselnden Content hat und ältere Beiträge nicht verloren gehen sollen. Zudem verspricht Google, daß die Indizierung dann schneller erfolgt.
Was liegt also näher, als sich ein kleines Perl-Script zu schreiben, das eine solche Sitemap erzeugt, und zwar direkt auf dem Server?
Also machte ich mich mal ran an das Problem, und zwar mit folgenden Vorgaben:
- Leicht zu konfigurieren
Weiterlesen...
5.12.2007
Die Schwartzsche Transformation - Arrays sortieren nach mehreren Kriterien
Oftmals hat man das Problem, daß man Arrayinhalte sortieren will.
Hat man nur einzelne Werte, wie zum Beispiel Nachnamen, kann dies bequem per sort() erledigt werden.
Etwas komplizierter wird es, wenn man nach mehreren Kriterien sortieren möchte, zum Beispiel nach Nachnamen und Vornamen.
Weiterlesen...
|
|
|
| |
| Gelesene Beiträge insgesamt:
4428203 |
|
|
RSS-Feed