Janek Schleicher wrote at Sat, 07 Sep 2002 10:06:34 +0200: >>> ... >>> print join "\n", grep defined, ($string =~ /"(.*?)"|(\w+)/g); >>> ... > > The regexp matches either "(.*?)" in $1 or (\w+) in $1. ^^ Of course, I meant $2.
> But the regexp always makes a list of both ($1,$2) foreach match. > That's why half of the list consists of undefined elements, > that have to be grepped out. > > It's not really nice, but it works. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]