substitution de parenthèses Résolu

Question

Bonjour,

Je cherche une solution en PERL pour substituer une chaîne de type :
        
          (01:25)      en     01:25

j'ai essayé  entres autres :  $v =~s/($\d+:\d+$)/$1/ ; mais sans changement de la chaine de caractère ni message d'erreur d'ailleurs.

j'ai aussi essayé $v=~s/$// ;   et $v=~s/$// ;  (donc en 2 lignes) et ça fonctionne mais j'ai aussi un message :
         "use of uninitialize value in substitution (s///)"
                         

Quelqu'un aurait-il une idée ? merci d'avance !!!

lami20j · Answer

Salut,

~$ echo '(01:25)' | perl -ne 's/($\d+:\d+$)/$1/;print'
(01:25)
~$ echo '(01:25)' | perl -ne 's/$(\d+:\d+)$/$1/;print'
01:25

lami20j · Answer

~$ echo '(01:25)' | perl -ne 's/[()]//g;print'
01:25

Substitution de parenthèses

2 réponses

Discussions similaires

Newsletters