Salut ci-dessous en utilisant le cmd i am identifier wheether dernier caractère de chaque ligne de milliers de dossiers, de virgule ou not.If dernier caractère virgule i am enlever virgule. Si dernier caractère n'est pas virgule puis je suis ajoutant la ligne suivante à la ligne actuelle.

Par exemple, mon fichier d'entrée est constitué de

ABC | FGH | HJK | JKK;
BHJ | AAA | BBB | L
NNNN | JJJJ | LLLL;
JJJJJJ;
consiste à mettre le fichier de
ABC | FGH | HJK | JKK
BHJ | AAA | BBB | L NNNN | JJJJ | LLLL
JJJJJ
Je suis la réalisation de l'exigence ci-dessus en utilisant sed comme ci-dessous

sed -e: a-e'/;$/! N; s / \ n / /; ta '-e' s /;$//' fichier

mais j'ai des milliers de fichiers dans un répertoire de sa consommation de plus en plus de temps.

Quelqu'un peut-il remplacer l'exigence ci-dessus en perl avec xargs

comme xargs perl option

cn quiconque suggérer la manière la plus facile sans boucle