On Wed, Nov 28, 2001 at 01:25:51PM -0500, [EMAIL PROTECTED] wrote:
> $string = "I want to delete all this spaces, but this";
> $string =~ s/\s{1}(?=\w)//g;
> print $string;
Almost, but it doesn't match his description. Consider a few edge cases:
"foo bar" is changed to "foo bar"
This is due to the fact that you're only using a positive lookahead to
determine if it's a lone space. You must take into account what's before
the space, as well, to determine if it's a lone space.
"foo . bar" is changed to "foo .bar"
This is due to the fact that you're doing the lookahead on \w when it should
be on \S, or possibly [^ ].
Michael
--
Administrator www.shoebox.net
Programmer, System Administrator www.gallanttech.com
--
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]