Discussion :

[ManusDei]

Bonjour,

dans une liste de fichier, je cherche toutes les déclaration de fonctions suivant un formalisme particulier à la déclaration. Jusque là pas de problème.

Code :

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

1
2
3
4
for i in $1/*.c
do
  echo $i; perl -ne 'if(/[A-Z0-9_]+\s+[A-Z]{4}_([A-Z][a-z]+)+\(/) {print $_; }' $i
done

Une fois que j'ai trouvé toutes les déclarations, je voudrais récupérer le nom de la fonction uniquement, c'est à dire la partie

Code :

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

1
2
 
[A-Z]{4}_([A-Z][a-z]+)+

et la stocker pour l'utiliser plus tard dans le script.
Pour l'instant je n'arrive pas à découper mon expression régulière pour en extraire la partie qui m'intéresse (je verrais après pour stocker et réutiliser).
J'ai essayé avec les parenthèses et le remplacement, sans succès.

Merci pour votre aide.

PS : Est-ce qu'il ne serait pas plus pertinent que je fasse un script Perl plutôt qu'un script ksh invoquant du Perl ?

[ManusDei]

J'ai réussi à isoler ma chaîne avec cette ligne de code

Code :

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

perl -ne 'if(/[A-Z0-9_]+\s+([A-Z]{4}_([A-Z][a-z]+)+)\(/) {print "$1\n"; }' $i

J'ai plus qu'à trouver comment sauvegarder les chaînes récupérées quelque part pour m'en servir.

Edit : Bon, je me rend compte que je ne suis pas parti dans la bonne direction. Je peux recommencer (presque) au début.