RE: How to Add spaces at the end of a line

[david]

Madhu Reddy wrote:


> $_ will have newline char......
> '  '(2 spaces) added after the new line char (\n)
> i want to add before newline char...
> i don't want to chomp the newline char....
> i want new line char should be there again..
> 
> how to do this ?

try:

#!/usr/bin/perl -w
use strict;

open(FH,"file.txt") || die $!;
while(<FH>) {
        s/\n/  \n/ if(length == 263);
        print;
}
close(FH);

__END__

david

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