Presumably now you've worked out that, to restrict it to quoted texts, you need something like:

    string: <perl_quotelike> 
                { my ($marker, $quote, $text) = @{$item[0]}[0..2];
                  !marker && $quote =~ /['"]/ ? $text : undef
                }
[download]