Keiner deiner Teststrings fängt mit / an. Wenn du qr{...} verwendest, gehört kein /.../ in die Regexp, da du ja schon { und } als Delimiter verwendest.

Edit: whoops, habe dein Edit nicht gelesen.
Ich bekomme mit dem obigen Code vor deinem Edit ohne den / das folgende Ergebnis:

Quote

$ perl test.pl
Use of uninitialized value $6 in concatenation (.) or string at test.pl line 29.
Zeile 0: matcht 1='Nov' 2='08' 3='22:59:19' 4='2012' 5='error' 6='' 7='Hostname www.......de provided via SNI, but no hostname provided in HTTP request'
Zeile 1: matcht 1='Nov' 2='09' 3='09:49:30' 4='2012' 5='error' 6='8.1.1.1' 7='Can't modify constant item in scalar assignment at /script.pl line 16, near "'schiess mich tot';", referer: https://.......pl/'

Was willst du mit dem RE-Modifier /s? Du testest doch nur einzelne Zeilen und /s ändert nur das Verhalten von dem ., der dann auch Zeilenumbrüche matcht. Ist also hier nicht sinnvoll.

Vielleicht schaust du dir mal http://www.youtube.com/watch?v=zcSFIUiMgAs an.
Last edited: 2012-11-10 13:03:25 +0100 (CET)