IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Perl Discussion :

expression reguliere perl


Sujet :

Langage Perl

  1. #1
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Mai 2011
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Mai 2011
    Messages : 8
    Points : 4
    Points
    4
    Par défaut expression reguliere perl
    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.

  2. #2
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Mai 2011
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Mai 2011
    Messages : 8
    Points : 4
    Points
    4
    Par défaut resolution
    reponse rapide

    grep -Po 'http[^"]'* fichier

  3. #3
    Rédacteur/Modérateur

    Avatar de Lolo78
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    Mai 2012
    Messages
    3 612
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information
    Secteur : High Tech - Opérateur de télécommunications

    Informations forums :
    Inscription : Mai 2012
    Messages : 3 612
    Points : 12 469
    Points
    12 469
    Billets dans le blog
    1
    Par défaut
    Tu demandais une réponse Perl, et tu donnes un grep...

    Ta réponse rejoins clairement celle que j'ai donnée sur ton autre post.

  4. #4
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Mai 2011
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Mai 2011
    Messages : 8
    Points : 4
    Points
    4
    Par défaut
    ???.
    En attendant, je n'arrive toujours pas à la réaliser dans une expression régulière...

    Une idée?

  5. #5
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Mai 2011
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Mai 2011
    Messages : 8
    Points : 4
    Points
    4
    Par défaut
    Un grand merci à un perlman sur un autre site.

    #! /usr/bin/perl -w

    use strict;
    use warnings;
    use File::Slurp; #Module qui facilite l'utilisation de fichiers // Voir CPAN

    my @fichier = read_file($ARGV[0]);

    foreach my $ligne (@fichier) {
    my $ip = $& if $ligne =~ m/[0-9.]{7,15}/;
    my $url = $& if $ligne =~ m/http[^"]+/;
    #... Suite du traitement ...
    }

  6. #6
    Rédacteur/Modérateur

    Avatar de Lolo78
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    Mai 2012
    Messages
    3 612
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information
    Secteur : High Tech - Opérateur de télécommunications

    Informations forums :
    Inscription : Mai 2012
    Messages : 3 612
    Points : 12 469
    Points
    12 469
    Billets dans le blog
    1
    Par défaut
    Citation Envoyé par rahon Voir le message
    Un grand merci à un perlman sur un autre site.
    C'est bien de remercier pour l'aide apportée sur un autre site, mais je t'avais tout de même donné la réponse sur ce site dès lundi (il y a donc deux jours):

    http://www.developpez.net/forums/d12...eguliere-perl/

    Et tu l'aurais vue si tu n'avais pas posté plusieurs fois la même question et oublié de consulter les réponses à ton autre question.

Discussions similaires

  1. expression reguliere perl
    Par devhercule dans le forum Langage
    Réponses: 8
    Dernier message: 24/03/2015, 14h01
  2. expression reguliere perl
    Par rahon dans le forum Programmation et administration système
    Réponses: 3
    Dernier message: 09/07/2012, 21h00
  3. Ecrire une expression reguliere en Perl
    Par moniphal dans le forum Langage
    Réponses: 11
    Dernier message: 10/11/2008, 11h54
  4. [langage] Ptit Probleme expression réguliere avec perl
    Par Shoot Again dans le forum Langage
    Réponses: 3
    Dernier message: 02/12/2004, 12h44
  5. [langage] Pb PERL : expressions regulières
    Par alexcluzel dans le forum Langage
    Réponses: 5
    Dernier message: 12/11/2004, 14h13

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo