Select Code to Download

$string = $parser->parse(Source => { Encoding => 'ISO-8859-1',
                                     String => <<"EOF;" } );
<!DOCTYPE foo
...
  This, '\240', would be a bad character in UTF-8.
</foo>
EOF;

<?xml version="1.0" encoding="UTF-8"?>
<foo>
...
  <zap fubar="1" ref="zing"></zap>
  This, 'Â ', would be a bad character in UTF-8.
</foo>

$expected = <<"EOF;";
...
  This, '\302\240', would be a bad character in UTF-8.
</foo>
EOF;

<?xml version="1.0" encoding="UTF-8"?>
<foo>
...
  <zap fubar="1" ref="zing"></zap>
  This, 'ÃÂ ', would be a bad character in UTF-8.
</foo>