[PERL] Recherche dans une chaîne de caractère

[PERL] Recherche dans une chaîne de caractère - Codes et scripts - Linux et OS Alternatifs

Marsh Posté le 14-11-2005 à 17:48:49    

Hello les gens,
 
Je suis en train de bosser sur un script de surveillance et je me prend la gueule sur une p'tite chaîne de texte :
 
DUMP: 491760 tape blocks (480.23MB) on 1 volume(s)
 
J'essaye de récupérer la taille entre parenthèse.
 
Bon, je précise que je ne suis pas un pro du PERL, j'essaye de me débrouiller mais bon.
 
Je partais sur ce code de recherche :
 
/tape blocks ((\d+).(\d+)MB) on/
 
J'ai essayé pas mal de variante et je n'arrive à rien.
 
Quelqu'un aurai une idée pour me débloquer ?
 
Merci d'avance,
Bonne soirée.


Message édité par MirabelleBenou le 14-11-2005 à 18:05:16

---------------
== Esprits.net est de retour !! ==
Reply

Marsh Posté le 14-11-2005 à 17:48:49   

Reply

Marsh Posté le 14-11-2005 à 17:56:30    

Code :
  1. /\(([[:digit:].]+)\)/


Message édité par minusplus le 14-11-2005 à 17:57:10
Reply

Marsh Posté le 14-11-2005 à 17:58:33    

euh... mais encore ?
 
Je l'ai dit, je ne connaîs quasiment pas PERL.
 
Merci de la réponse en tout cas (et oui j'ai déjà cherché sur le Net ou dans des tutoriaux :) )


---------------
== Esprits.net est de retour !! ==
Reply

Marsh Posté le 14-11-2005 à 18:11:15    

<code>
if ( m/\((.+)MB\)/ )
{
  $val=$1;
  print "$val\n";
}
</code>
 
. = tout caractères
+ = 1 ou plus
les ( ) = sauvé ds une variable, par ordre, $1, $2, ... $n
donc tout caractères entre ( et MB) doivent etre pris
pour infos les \ sont nécessaire pour ne pas interprété les parenthèses.
 
!google regexp  
!google perl in a nutshell


---------------
&THEN :: t-shirts geek collectorZ:: fermeture pour noel ::  http://and.then.fr
Reply

Marsh Posté le 14-11-2005 à 19:40:00    

Merci mavk-t !


---------------
== Esprits.net est de retour !! ==
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed