Discussion :

[Ph3nol]

Bonjour,

Je parcours plusieurs fichiers, de manière récursive via un find.

Sur chaque fichier, j'aimerais faire un "find and replace" à l'aide de `perl`. Je vous passe les traitements, voici l'idée :

Code :

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

1
2
3
4
5
6
7
8
9
 
FILES=`find /my/path -name "*.scss" -o -name "*.css" -type f`
 
for FILE in $FILES
do
    # Quelques traitements pour obtenir $CSSFILENAME
 
    perl -p -i -e 's/url\("\.\.\//url\(\"'"$CSSFILENAME"'\//g' $FILE
    # Quelques autres manipulations

Mon problème est que mon `perl -p -i -e` ne remplace pas par la variable en question, semble l'ignorer comme si elle était vide ou me crée des erreurs (c'est le cas dans mon exemple).

Une idée ?

Merci par avance.

Cédric.

[disedorgue]

Bonjour,

Pas super propre le code, dans différents posts, on dit sans arret de ne pas utiliser la boucle for pour passage d'une liste de fichier car cela ne fonctionne pas avec des noms de fichier avec espace...

Pourquoi passer par perl pour une simple expression régulière ? sed est suffisant pour cela, de plus le sed gnu possède aussi l'option "-i".

Sinon, ton erreur est sur le premier guillemet qui n'est pas quoté:

Code :

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

perl -p -i -e 's/url\("\.\.\//url\(\"'"$CSSFILENAME"'\//g' $FILE

ou le deuxième qui est quoté:

Code :

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

perl -p -i -e 's/url\("\.\.\//url\(\"'"$CSSFILENAME"'\//g' $FILE