/blog/perl


substr() in Perl
[121609 mal gelesen]
foreach in Perl
[112078 mal gelesen]
Arrays in Perl - Besonderheiten
[103935 mal gelesen]
open() - Dateien öffnen in Perl
[94639 mal gelesen]
split() in Perl - Zeichenketten teilen
[81680 mal gelesen]
chomp() in Perl
[81394 mal gelesen]
grep - Listen durchsuchen in Perl
[78733 mal gelesen]
push in Perl
[73956 mal gelesen]
sleep in Perl - Das aktuelle Script warten lassen
[57714 mal gelesen]
print in Perl
[47855 mal gelesen]


Arrays
Dateien
HTPC
Hashes
Leistungsoptimiert
PHP
Perl
RegEx
Schleifen
Script
Skalare
Sonstiges
System
Webserver
Zur Startseite




Donnerstag, 3.1.2008, 08:13:26 Uhr

Fortgeschrittenes beschreiben von Dateien - einzelne Zeilen finden und ändern bzw. löschen


Nun, ich gebs ja zu, oft bin ich ja als Grundlagenforscher unterwegs.
Diesmal geht es darum, Dateien möglichst so zu beschreiben, so daß beim Einlesen bestimmte Zeilen besonders schnell wiedergefunden werden können.

Na gut, ein Beispiel
Ich habe 1000 fortlaufende Rechnungsnummern, dazu jeweils 1000 Brief-Texte, die ich in einer Datei speichern will.
Später will ich möglichst effektiv auf jeweils beliebige Rechnungsnummern plus Brief-Texte zugreifen.
Weiterlesen...


Dieser Beitrag wurde 5068 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Montag, 31.12.2007, 18:27:33 Uhr

Auch von mir ein frohes neues Jahr 2008



Nachdem in diesem Jahr wieder so viel schönes (und auch unschönes) passiert ist und das das Jahr 2007 unweigerlich zu Ende geht, wünsche ich allen Lesern meines Blogs ein frohes und gesundes Jahr 2008.

Ich würde mich freuen, wenn auch im neuen Jahr wieder so viele Besucher durch ihre Anregungen und Kommentare an meinem Blog teilnehmen!

Weiterlesen...


Dieser Beitrag wurde 2217 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Donnerstag, 20.12.2007, 05:57:34 Uhr

until in Perl



The until-command repeats a block, until a expression is true.

A simple example:

$i=0;

until ($i==10){print "$i\n";
$i++;
}


Weiterlesen...


Dieser Beitrag wurde 3200 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Montag, 17.12.2007, 13:00:03 Uhr

Dateiendung herausfinden mit Perl


Also, wieder einmal etwas aus (meiner) Praxis:
Nachdem ich mich ja immer noch mit dem Verarbeiten von Webseiten beschäftigte, tauchte das Problem auf, daß ich Dateiendungen in <img...> oder <link...>-Tags herausfinden wollte.

Die einzelne Extraktion hab ich ja schon hier beschrieben, also wie man zum Beispiel an den Dateiname kommt.
Weiterlesen...


Dieser Beitrag wurde 8755 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Samstag, 15.12.2007, 15:52:52 Uhr

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...


Dieser Beitrag wurde 6173 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Freitag, 14.12.2007, 21:03:01 Uhr

Neuer Sozialfotografie-Blog online


Ein weiterer Blog, der auf meiner Software basiert, ist heute online gegangen.

Helge Lindau, ein langjähriger Fotograf, widmet sich dort dem Thema Sozialfotografie, im Besonderen dem Leben der Sinti und Roma.

Weiterlesen...


Dieser Beitrag wurde 2535 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Dienstag, 11.12.2007, 11:51:25 Uhr

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.

my $name='Ich bin Perl';
my $res=rindex($name,"bin");
print $res;


Weiterlesen...


Dieser Beitrag wurde 6117 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Dienstag, 11.12.2007, 11:20:43 Uhr

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...


Dieser Beitrag wurde 3969 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Donnerstag, 6.12.2007, 17:25:53 Uhr

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...


Dieser Beitrag wurde 4916 mal gelesen.

  Vollen Beitrag lesen    Nach oben





Mittwoch, 5.12.2007, 15:01:45 Uhr

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...


Dieser Beitrag wurde 6907 mal gelesen.

  Vollen Beitrag lesen    Nach oben



B l o o o o o o o o o o o o o o o o o o g
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19


SSD-Festplatte - Wassn das???
Die Transliteration - Nur ein Zeichen in einem Skalar ersetzen
Select - Case in Perl
Windows 7 XP Mode – Wo finde ich den XP-Modus unter Windows 7?
Mac-Adresse beim Apple Macintosh herausfinden
SGN-Funktion für Perl
truncate - Dateigröße verändern in Perl
Eigene IP herausfinden mit Perl
Epoche live in Datum umwandeln
Firefox 3 - Exe-Files downloaden


Von: Schorschel eastcoast
Kommentar:
Danke. Das hat mir weitergeholfen.
Zum Beitrag


Von: Jessica
Kommentar:
Kann man auch zwei Datein parallel einlesen?

Zum Beitrag


Von: Xtravaganz
Kommentar:
Für

Zum Beitrag


Von: Xtravaganz
Kommentar:
Für

Zum Beitrag


Von: Sammy
Kommentar:
wie lautet denn die syntax wenn ich eine perl datei in einer perl datei öffnen will. also hier steht ja "|datei: " muss ich da noch ein ".pl" anhängen oder nicht?
Zum Beitrag



Gesamtverzeichnis
Februar 2010
Dezember 2009
Oktober 2009
Januar 2009
Dezember 2008
November 2008
September 2008
August 2008
Juli 2008
Juni 2008
Mai 2008
April 2008
Januar 2008
Dezember 2007
November 2007
Oktober 2007
September 2007
August 2007
Juni 2007
Mai 2007
April 2007
März 2007
Februar 2007
Januar 2007
Dezember 2006


Mister Wong

RSS-Feed

Heute ist der
21.11.2017

Es ist
21:48:53 Uhr

Ihre IP:
54.158.214.111

Blog-Einträge: 186

Die letzten 24 Stunden im Überblick


Gelesene Beiträge insgesamt:
3538736


Webseiten vergleichen
Kalender mit Feiertagen - 2028
Links finden und testen
Menschliche Datumsangaben
IP zu Domain herausfinden
Time live in Datum umwandeln
Perl für Windows



Mo Di Mi Do Fr Sa So
12345
6789101112
13141516171819
20212223242526
27282930

Impressum