Benötige Hilfe bei RegEx - #97661 (Allgemeines zu Perl)

jogi

2007-08-06 19:26

User since
2007-07-25
55 Artikel
BenutzerIn
[default_avatar]

Hey Danke, deine RegEx funktioniert perfekt. Jetzt fehlt mir aber doch noch der Nickname des Routers.

So sieht mein Versuch aus:

Code: (dl )

r AbbyNormal 1kp4+bE83l+pBSDfBgDHju57NFE 3Job71lL5/qbZMzifsCuQCFgbV8 2007-08-06 10:34:06 72.15.233.132 9001 0

Code (perl): (dl )

    # Zeile1
    if ( $line =~ /^r\s([a-zA-Z0-9_])\s[a-zA-Z0-9_\/\+]\s[a-zA-Z0-9_\/\+]\s(\d{4}-\d\d-\d\d)\s(\d\d:\d\d:\d\d)\s(\d+\.\d+\.\d+\.\d+)\s(\d+)\s\d+$/ ) {
        print "Zeilentyp: 1\nDatum: $1\nUhrzeit: $2\nIP Adresse: $3\nPort: $4\n";
    }

Was genau stimmt hier nicht?