expression reguliere perl

[rahon]

Bonjour à tous,

j'essaye de faire mumuse avec un fichier de log apache.
Depuis peu sur PERL, j'ai du mal à réaliser une expression régulière.

Ex log:
XX.XX.XX.XX - - [04/Jan/2012:13:38:59 +0100] "GET /css/default.css HTTP/1.1" 200 860 "http://mformation.local/live.php" "Mozilla/5.0 (Linux; U; Android 2.3.4; fr-fr; HTC/Sensation/1.45.163.4 Build/GRJ22) AppleWebKit/533.1 (KHTML, like Gecko) Version/4.0 Mobile Safari/533.1"

J'ai réussi à obtenir les IP, le code 200....,la date..
Mais je n'arrive pas à afficher le site visité.
ex: "http://mformation.local/live.php"

Quelqu'un peut-il me filer un ptit coup de main.
D'avance merci.

[brice45]

Bonjour,

Essaie cette expression rég. ça devrait marcher :

Code :

$str=~/(http:\/\/.*\")/i

[Lolo78]

Je ne pense pas que ça marchera, parce que ça va capturer toute la fin de la ligne jusqu'au "Safari/533.1" final, parce que l'opérateur * est "glouton".

Je verrais plutôt ceci :

Code :

$str =~ /(http:\/\/[^"]+)/i;

[Lolo78]

Entre temps, j'ai testé, je confirme ce que je disais. L'expression régulière de Brice capture tout le reste de la ligne, tandis que la mienne capture bien 'http://mformation.local/live.php'.