> So, I think you really want:
>
>   if ( $query =~ m#/\*\+\s+(.+?)\s+\*/# )

Ok, so let me make sure I am reading your pattern correctly:

/ > match a single /
\* > followed by a single *
\+ > followed by a single +
\s+ > followed by one or more spaces
(.+?) > followed by one or more non-newline characters, which will match up
to the first occurrance of the next character after the ?, the contents of
the match being placed in $1
\s+ > followed by one or more spaces
\* > followed by a single *
/ > followed by a single /

Peter

Reply via email to