Somme des entiers dans un fichier Perl

Fermé
rahalfat10 - Modifié par rahalfat10 le 27/04/2010 à 19:08
Bonjour,

Chers amis,

J'ai besoins de votre aide en urgence.

Comment je peux extraire des entiers dans des lignes d'un fichier et faire la somme ??

Par exemple:

fichier: test.txt

je suis un amateur de perl
la valeur est 12
merci

Perlest un bon langage merci perl
la valeur est 5
Merci
....
....
...

Ce que je veux c'est d'extraire les entier 12 et 5 si le mot "perl" existe dans la ligne juste avant la ligne qui contiennent "perl" et puis de renvoyer leur somme

Merci d'avance.