Problème regexp

**Yux** · 18/02/2006, 17h39

Salut,

J'ai des difficultés à trouver une regexp. Je veux parser un fichier de configuration dont certaines lignes ont le format suivant (espaces en début de lignes, espaces ou tabulation(s) entre le premier mot et la chaîne de caractères) :

Code :

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

1
2
3
  host1    'cpu disk'
  host2    'cpu disk mem'
  host3    'disk'

Le but est d'extraire le mot en début de ligne et la chaîne de caractères entre quotes. A des fins de test, j'étais parti sur ce code (pour le moment, je n'ai pas mis les parenthèses destinées à l'extraction) :

Code :

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

1
2
3
4
5
6
7
8
open CONF, '<./config_file';
 
while(<CONF>)
{
    if(m/\s+\w\s+'(\w\s?)*'/) { print $_; }
}
 
close CONF;

Rien ne s'affiche.

J'ai décidé de procéder étape par étape, en testant ça :

Code :

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

  if(m/^\s+\w/) { print $_; }

Toutes les lignes souhaitées s'affichent. Par contre, si je rajoute simplement ça :

Code :

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

  if(m/^\s+\w\s+/) { print $_; }

ou même ça :

Code :

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

  if(m/^\s+\w\s/) { print $_; }

plus rien ne s'affiche... Je ne maîtrise pas les expressions régulières mais jusqu'ici, ça devrait fonctionner... Si une âme charitable pouvait éclairer ma lanterne...

**Yux** · 18/02/2006, 17h51

Errata : dans l'exemple de fichier de conf que je donne, les noms de machines utilisés contiennent des chiffres. Ce n'est pas le cas dans le fichier que j'utilise pour mes test. A terme, j'essaierai de faire évoluer la regexp pour travailler sur les IPs mais vu comme je me galère pour l'instant, ça attendra

**Jedai** · 18/02/2006, 17h55

Je pense que c'est un simple petit oubli de ta part, juste une distraction probablement :

Code :

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

1
2
 
m/\s+\w+\s+'([\w\s]*)'/

Tu avais oublié les "+" après les "\w"...

--
Jedaï

**Woufeil** · 18/02/2006, 18h00

Bon, étant donné que je ne connais pas ton fichier, je ne oeux pas savoir si mon expression marche correctemment, néamoins j'ai pensé à ça :

Code :

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

m/\s\w+\t'\w* |\s*'/

En tout cas, il match les chaînes que tu m'as donné, quand à savoir si il en match trop...

€dit : Oups, Jedai trop rapide pour moi, de bons réflexes tu as

En tout cas nous sommes d'accord sur la regex

**Yux** · 18/02/2006, 18h05

Oh là là, le gros boulet...

Merci Jedaï, une fois de plus...

Tant que j'y suis et sans vouloir abuser, pourrais-tu m'aider à remplacer le premier \w+ par quelque chose qui matche indifféremment un FQDN quelconque ou une adresse IP ? :o