[Info-vax] Removing blank lines from text files
Dave Froble
davef at tsoft-inc.com
Sat Jun 15 19:09:55 EDT 2019
On 6/15/2019 6:32 PM, Bob wrote:
> For now, I'm using this simple script:
>
> $ open /read old 'p1
> $ open /write new 'p1
> $loop:
> $ read /end=exit /error=exit old line
> $ if f$edit (line, "collapse") .eqs. "" then goto loop
> $ write new line
> $ goto loop
> $exit:
> $ close new
> $ close old
> $ exit
>
It's better in Basic ....
:-)
--
David Froble Tel: 724-529-0450
Dave Froble Enterprises, Inc. E-Mail: davef at tsoft-inc.com
DFE Ultralights, Inc.
170 Grimplin Road
Vanderbilt, PA 15486
More information about the Info-vax
mailing list