Le Lundi 21 Juillet 2003 22:11, Bernard Lambey a �crit :
Lundi 21 Juillet 2003 � 08h14, Daniel Moyne a �crit :
Merci, Jean �a fonctionne !
Daniel Moyne
Jean est bien plus fort qu'il ne le laisse entendre! Bernard L.
Jean, mainetant une question plus compliqu�e pour traiter un groupe de 3 lignes cons�cutives qui commencent par :
$d�but_1,
$d�but_2,
$d�but_3,
et que je veux enlever d'un certain endroit (donc trouv�es � partir de ton script) et recopier � 2 endroits diff�rents situ�s apr�s les lignes commen�ant par :
$position_1,
et par :
$position_2,
ceci apr�s avoir modifier les d�buts en :
$_d�but_1,
$_d�but_2,
$_d�but_3.
J'imagine une double boucle dectraitement :
- je commence � lire en recopiant toutes les lignes sauf le groupe de 3,
- quand je trouve un groupe je stoppe sans recopier ces 3 lignes,
- je ferme mon fichier,
- je le r�ouvre,
- je reprend au d�dut la recherche de position_1 apr�s quoi j'ins�re mes 3 lignes modifi�es (comment faire ?) avec le m�thode classique,
- je le r�ouvre,
- je reprend au d�dut la recherche de position_2 (j'ignore si position_2 est avant ou apr�s position_1) apr�s quoi j'ins�re mes 3 lignes modifi�es (idem ?) avec le m�thode classique,
- je recommence jusqu'� ce que j'atteigne la fin du fichier,
- je ferme le fichier.
Note : je ne peux pas retraiter mes ajouts puisque je modifie les en-t�tes.
Si tu pouvais me donner la strucure de tout cela en Perl.
Merci d'avance.
A vrai dire, je n'ai pas compris grand chose � l'�nonc� du probl�me... tu pourrais �tre plus clair stp?
Ensuite, pourquoi fermer puis r�ouvrir les fichiers? Ca sont des acc�s disques lents et inutiles.
Au contraire, tu stocke tout en RAM dans des variables tableau (@variable) afin que le script agisse comme l'�clair. Un simple test dans la boucle qui s'il est positif repositionne le compteur, et hop, en plus on �conomise de l'espace m�moire :-)
Allez, je te renvoie � l'�nonc�. Un exemple ou deux sera toujours bienvenu.
-- Jean \\\!/// -(@ @)- ----------------------------oOO--(_)--OOo---------------------------- Jean Segers Venez r�ver -----> http://www.Demoiselle.com 26, rue du Pin http://www.Sadems.com 34190 Saint Bauzille de Putois http://it.mondelinux.org France http://www.deveze.com Gsm 06 86 12 49 15 http://www.cyberboutic.com Tel 04 67 73 38 30 http://mdk.mondelinux.org Fax 08 25 19 24 61
smime.p7s
Description: S/MIME Cryptographic Signature
