[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