>>>>> "PRW(" == Peter R Wood (Lists) <[EMAIL PROTECTED]> writes:
>> if ( $query =~ m#/\*\+\s+(.+?)\s+\*/# )
not sure if i would do it this way but an alternative to all the
backslash quoting and alternate delimiters is \Q\E:
/\Q/*+\E\s+(.+?)\s+\Q*/\E/
it makes the /*+ and */ string contiguous and easier to see. the expense
is the extra \Q\E stuff which is noisy itself.
uri
--
Uri Guttman ------ [EMAIL PROTECTED] -------- http://www.stemsystems.com
-- Stem is an Open Source Network Development Toolkit and Application Suite -
----- Stem and Perl Development, Systems Architecture, Design and Coding ----
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
