Re: regex for strings with escaped quotes

use Regexp::Common qw/delimited/;

my $str = q{ x "foo \"bar\"" y };
$str =~ /($RE{delimited}{-delim=>'"'})/;
print $1, "\n";

print $RE{delimited}{-delim=>'"'}, "\n";

__END__

"foo \"bar\""
(?:(?|(?:\")(?:[^\\\"]*(?:\\.[^\\\"]*)*)(?:\")))

[download]

Replies are listed 'Best First'.
Re^2: regex for strings with escaped quotes by morgon (Priest) on Feb 12, 2019 at 15:52 UTC
It somehow stops working when I use the regex directly and I cannot see why: `my $str = q{ x "foo \"bar\"" y }; $str =~ /(?:(?\|(?:\")(?:[^\\\"](?:\\.[^\\\"])*)(?:\")))/; print $1, "\n"; # prints nothing` [download]	[reply] [d/l]
Re^3: regex for strings with escaped quotes by haukex (Archbishop) on Feb 12, 2019 at 15:55 UTC
`$str =~ /(?:(?\|(?:\")(?:[^\\\"](?:\\.[^\\\"]))(?:\")))/;`* It's missing the capture group that I added: `/($RE{delimited}{-delim=>'"'})/`	[reply] [d/l] [select]
Re^4: regex for strings with escaped quotes by morgon (Priest) on Feb 12, 2019 at 16:35 UTC
I don't quite understand... I do basically this: `use Regexp::Common qw/delimited/; print $RE{delimited}{-delim=>'"'};` [download] And take what is printed. How can I get to a pure regex that works then?	[reply] [d/l]
Re^5: regex for strings with escaped quotes by haukex (Archbishop) on Feb 12, 2019 at 16:47 UTC
Re^6: regex for strings with escaped quotes by morgon (Priest) on Feb 12, 2019 at 17:11 UTC
Re^2: regex for strings with escaped quotes by morgon (Priest) on Feb 12, 2019 at 15:17 UTC
thanks, but I forgot to mention one detail: I do not need this for a perl-program but for a perl5-compatible regex engine in Go. I there a way to print the regex that is used?	[reply]
Re^3: regex for strings with escaped quotes by haukex (Archbishop) on Feb 12, 2019 at 15:19 UTC
I there a way to print the regex that is used? That's what the second line of output above is. Simplification of that regex is left as an exercise to the reader `:-)` (Update: Nevermind.) BTW, you can also use the `-keep` feature to get only the part between the quotes: `use Regexp::Common qw/delimited/; q{ x "foo \"bar\"" y } =~ /$RE{delimited}{-delim=>'"'}{-keep}/; print $3, "\n"; # prints: foo \"bar\"` [download]	[reply] [d/l] [select]
Re^4: regex for strings with escaped quotes by morgon (Priest) on Feb 12, 2019 at 15:24 UTC
Many thanks. This is exactly what I need - let's see if I can feed that to the go-engine...	[reply]


Keep It Simple, Stupid
	PerlMonks