are you speaking of this?

use strict;
while(my $line = <>) {
        ($line) = ($line =~ /^\s*(.*)\s*\n$/);
        print($line."_nice/n");
}

-----Original Message-----
From: LoneWolf [mailto:[EMAIL PROTECTED]
Sent: Thursday, September 04, 2003 3:38 PM
To: [EMAIL PROTECTED]
Subject: Getting rid of white space...


I have about 12 files that I am pulling for a SCO box to a RedHat box, FTP. 
THe files from the SCO box are poorly formatted with extraneous whitespace
(sometimes as much as 30 or more) before and after the text.  I need to
parse all of the files I DL and put them into a new file with "_nice" added
at the end.

The files are all pipe-delimited, so I don't have a problem separating the
fields, I just am not sure how to make it remove all extra whitespace.  It
needs to keep all Space in the fields "        the    description   of   the
 file        " should still be readable as "the description of the file"

Any help with code examples?  I have been looking through a beginning book
and my old code and have come up nil.

Thanks,
Robert

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to