>perl -n00e'tr/\n/ /; print "$1\n" while s/^(.{0,69}\S)\s+//; print "\n"'
Thanks! Far FAR better than anything I tried before.
However.. TR is killing paragraphs (double space is what I'm used to
because eMacs [and Greenview vEdit] stops reformatting when there is
an empty line) and includes carriage returns (^M) in the middle of
lines.
I can probably use it to fix the CR by myself, but I have no clever
clue how to deal with the paragraphs. I can probably convert double to
some code, then remove all cr & fl then put it back in place of the
code, but I'm guessing someone more experinced has a cleaner trick.
PS, what is .{}--
- = -
Vasos Panagiotopoulos, Columbia'81+, Reagan, Mozart, Pindus, BioStrategist
http://ourworld.compuserve.com/homepages/vjp2/vasos.htm
---{Nothing herein constitutes advice. Everything fully disclaimed.}---
[Homeland Security means private firearms not lazy obstructive guards]
[Urb sprawl confounds terror] [Remorse begets zeal] [Windows is for Bimbos]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
