http://qs1969.pair.com?node_id=69182


in reply to Death to Dot Star!

Why not just $myvar =~ /"([^"]*)\?"/

Replies are listed 'Best First'.
(Ovid) Re(2): Death to Dot Star!
by Ovid (Cardinal) on Apr 03, 2001 at 10:12 UTC
    /"([^"]*)\?"/ almost works, but often, quoted strings allow escapes:
    my $myvar = '"Did John say \"go home\" to Suzie?"'; $myvar =~ /"([^"]*)\?"/;
    The above code will put " to Suzie" (without the quotes) in $1.

    Cheers,
    Ovid

    Join the Perlmonks Setiathome Group or just click on the the link and check out our stats.

      So does yours. If you want to allow \" inside strings, you need to use something like /"((?:\\"|[^"])*)\?"/