Re: Regexp doubt


laziness, impatience, and hubris
	PerlMonks

by kiruthika.bkite (Scribe)

on May 04, 2010 at 08:34 UTC ( #838266=note: print w/ replies, xml )

Need Help??

Is this you are expecting ?

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

Comment on Re: Regexp doubt Download Code
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]