On Tue, 19 Feb 2002, Simon Cozens wrote:
> Peter R. Wood (Lists):
> > if ($query =~ /\/\*\+\s+(.*)\s+\*\//) {
>
> First thing I'd do is remove the Leaning Tentpole Syndrome:
>
> > if ($query =~ m#/\*\+\s+(.*)\s+\*/#) {
>
> and probably leave it at that.
I kinda like using /x to separate elements with whitespace even
if I'm not doing the full multi-line verbosely-commented spiel:
if ($query =~ m{ /\*\+ \s+ (.*?) \s+ \*/ }x) {
I find it easier to see what's a quantifier and what's a literal
when it's not all jammed together. :) But TMTOWTDI and YMMV.
Alan