> > > line. My guess is that
> > > print OUTFILE ($line);
> > > also feeds a CR. Is there a way around this?
>
> > while (<INFILE>) {
> > chomp;
> > if (/ /) {
> > print OUTFILE "\"$line\"\n";
> > }
> > else {
> > print OUTFILE $line, "\n";
> > }
> > }
> >
> > Give that a shot!
> > Luke
>
> except that you've mixed your metaphors, using chomp on the
> default $_, but
> still printing $line.
Whoops! Change that $line to $_
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
