• [^] # Re: je ferai en perl

    Posté par . En réponse au message Aide sous-titres vidéo. Évalué à 5.

    J'ai l'impression que ton truc supprime toutes les lignes vides ce qui n'est pas le résultat escompté.

    Non je vire les lignes vides après --> dans la première version et une ligne vide maximum après -->

    Par contre si y'a que des lignes vides entre 2 timestamp la première version risque de poser problème :)

    La solution bourrinne virant toutes les lignes vides puis en ajoutant juste une avant celle avec --> est pas mal :)

    while(<>){
 print "\n" if (/-->/);
 print if (/\w/);
}

    ce qui peut bien évidemment se faire en ligne de commande 

    perl -ne '{print "\n" if (/-->/);print if (/\w/) }'

    Il ne faut pas décorner les boeufs avant d'avoir semé le vent