Re: Regexp doubt

Is this you are expecting ?

$_='"ab"cde"fgh"';
s/("(.*?)")((.*?)")/$1 "$3 "/;
print $_;
[download]

Comment on Re: Regexp doubt Download Code

Replies are listed 'Best First'.
Re^2: Regexp doubt by Anonymous Monk on May 04, 2010 at 09:43 UTC
Thanks all for handy solutions. Improvised from Anomalous Monk's solution `perl -e '$_= q["ab"cde"fgh"];print $1,"\t" while m/(?=("[^"]*"))/g'` [download]	[reply] [d/l]