On May 5, 2004, at 2:32 PM, Charles K. Clarkson wrote:
Hmmm. I wonder:
$_ = q|It's a winner and shouldn't fail. Unless someone were prone to separating sentences with two spaces.|; print join ' ', grep { not /^[a-z]$/i } split;
I imagine we could fix that:
print join '', grep { not m/^[a-z]$/i } split m/(\s+)/;James
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
