Hei bruker nedenfor cmd jeg identifisere wheether siste tegn på hver linje i tusenvis av filer som semikolon eller not.If siste tegnet er semikolon jeg fjerner semikolon. Hvis det siste tegnet er ikke semikolon da jeg legge neste linje å presentere linje.

For eksempel min input fil består av

ABC | FGH | HJK | JKK;
BHJ | AAA | BBB | L
NNNN | JJJJ | LLLL;
JJJJJJ;
ut putte fil består av
ABC | FGH | HJK | JKK
BHJ | AAA | BBB | L NNNN | JJJJ | LLLL
JJJJJ
Jeg oppnå ovennevnte krav hjelp sed som under

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

men jeg har tusenvis av filer i en katalog sin konsumere mer og mer tid.

Kan noen erstatte ovennevnte krav i perl med xargs

som xargs perl alternativ

cn noen foreslår at den enkleste måten uten looping

hvordan sed:

Hei Jim,

Ovennevnte koden arbeider med sed men det er tidkrevende for mye tid .. kan du gi det samme med perl syntaks.
Funksjonaliteten er den har å identifisere siste tegn på hver linje av alle filer som semicolon.if grunnla det som semikolon det har å erstatte med mellomrom ellers trenger for å legge neste tråd med gjeldende.

se annen tråd

cn noen gi meg løsningen for å erstatte sed med perl i ovennevnte