On Thu, Dec 12, 2002 at 12:48:11AM -0500, Jeff 'japhy' Pinyan wrote: > On Dec 12, Jonathan E. Paton said: > > >(my $sql = << '--') =~ s/\A(\s+)(?{$::c = $^N})|^(??{$::c})//gm; > > > >all over SQL related source code then your head is on the block! > > While it's cool, and I'D use it, for readability purposes, might I > suggest: > > $sql =~ /(\s*)/ and $sql =~ s/^$1//mg;
The question was how to do it in one regex; the original poster already knew how to do it with two regexes. Abigail