parser perl

Bonjour,
J'ai un fichier xml que je souhaite parser pour récupèrer les parties qui m'intéressent.
J'ai mis en place un programme avec sub charHandler et sub start Handler.
Mais je n'arrive pas a la faire fonctionner.

Voici un morceau de ce que je dois parser.

- <Antenna.Sub-System>
- <Antenna Id="FR1-ANT1">                          #ici je doisrécupèrer FR1-ANT1
  <In.Use>1</In.Use>
  <Feeder.Loss>-30</Feeder.Loss>                 #ici -30
  <Feeder.Voltage>12</Feeder.Voltage>
  <Antenna.Round.Trip.Delay>254.0</Antenna.Round.Trip.Delay>
- <MHA Id="FR1/MHA1">
  <In.Use>1</In.Use>
  <MHA.Gain>120</MHA.Gain>
  <Serial.Number />
  <Product.Code />
  <MHA.Type>WMHA</MHA.Type>
  <WMH.Connector />
  <Uplink.Delay>0</Uplink.Delay>
  <Downlink.Delay>0</Downlink.Delay>
  <MHA.Alarm.Detection>1</MHA.Alarm.Detection>
  </MHA>
- <RTT>


Et il y en a une 20aine de ce genre à traiter.
Pourriez vous m'aider pour cet exemple?
Merci d'avance.

Je ne sais pas se que ce post fais ici (C++)...
En perl, je te sugere d'utiliser les REGEX (regular expression), qui sont le pilier du language perl.
Ex : my $string1 = 'boby';
       if($string1 =~ /boby/)
       {
           return true;
       }
Sinon, tu a aussi une classe deja fait en perl (XML::Simple par exemple, downloadable via CPAN).

Ciao

Pepsidrinker