Fellow Twiglets,

I'm working with a large XML document that has pairs of double quotes throughout. I'm trying to convert the bland--Unicode names follow--"QUOTATION MARK"/"QUOTATION MARK" pairs into appealing "LEFT DOUBLE QUOTATION MARK"/"RIGHT DOUBLE QUOTATION MARK" pairs. I thought this would be an easy task by using char_handler, but entities throw a wrench in the process.

For demonstration purposes (and ease of reading), the example code is replacing the double quote pairs with single quote pairs; observe:

This... 
use warnings;
use strict;
use XML::Twig;

my $twig = XML::Twig->new(
    char_handler => sub {
        my ($txt) = @_;
        $txt =~ s/"(.*?)"/'$1'/g;
        return $txt;
    },
    ### Note: These are included for terminal ease.
    ### The problem still exists without them.
    pretty_print => 'indented',
    keep_encoding => 1,
);
$twig->parsestring(*DATA);
$twig->flush();

__DATA__
<root>
    <data>"A", "B&#x2014;C", "D"</data>
</root>

[download]
Yields... 
<root>
  <data>'A', "B&#x2014;C', 'D"</data>
</root>

[download]
And I was expecting... 
<root>
  <data>'A', 'B&#x2014;C', 'D'</data>
</root>

[download]
Is it possible to parse the content and the entities together in XML::Twig, or must I result to looking for partial matches and saving open and close states?

Please note: I'm doing a lot more than just swapping out quotes, so changing XML modules is probably not an option.

Thanks.

In reply to Jointly parsing characters and entities in XML::Twig by eff_i_g

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.