Discussion :

[kimous]

Salut!

Je viend demander de l'aide ^^
Je suis débutant en perl ... et j'ais un petit souci mais je me torture car je n'arrive pas à comprendre .
Je vous expose mon problème:
- Je fais des sauvegardes sur bande au boulot. La date, le type de sauvegardes et le numéro des bandes sont stokée sur un fichier .log.
- Je voudrais allé chercher des infos présices comme la date et le type de sauvegardes sur ce fichier .log et les rassemblèes sur un fichier .txt à l'aide d'un script perl.
- Le problème est que je ne sais pas comment mis prendre....

Pour toutes questions complémentaire n'hésitez pas!!

PS: dsl je me suis rendu compte après que je me suis tromper de lieu pour poster dsl...

Merci d'avance
Kimous

[iblis]

• Lis le fichier ligne par ligne
• Isole les champs qui t'intéressent
• Ecris les infos sur la sortie

Si tes enregistrements sont multilignes, tu vas avoir besoin d'une gestion d'état dans la lecture ligne à ligne.

Sinon, voici un exemple tout bête qui imprime le deuxième champ, si la ligne contient au moins trois champs séparé par des espaces ou des tabulations.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
#!/usr/local/bin/perl
use strict; use warnings;
 
while (<>) {
    my @fields = split /\s+/;
    print $fields[1], "\n" if @fields >= 3;
}

Sauf si le fichier de log est très structuré un uniligne devrait faire l'affaire.

Si tu n'y arrives pas du premier coup, poste tes essais (avec un bout du fichier de log).

[kimous]

Je te remerci beaucoup pour ta réponse, ça fut rapide!
^^

Je test au plus vite et fais par du résultat qu'il soit positif ou négatif!

Encore merci!

Kimous

[kimous]

C'est bon j'ais trouver la solution!!!
Youpie DSL....

Bref te remercie car c'était la formule qui me manquai

Encore merci pour ton aide!

[iblis]

Pense à passer ton poste en résolu.