in reply to Re: validating a quoted string
in thread validating a quoted string

Sorry, My bad, typo, it should be
$in =~ /(["]?)[^" ]+\1/