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
