XML-Tiny

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

t/minimal.xml
t/amazon.xml
t/rss.xml
t/amazon-parsed-with-xml-parser-easytree
t/rss-parsed-with-xml-parser-easytree
t/02-oddballs.t
t/two-docs.xml
t/doc-and-a-bit.xml
t/text-only.xml
t/03-attribs.t
t/04-cdata.t
t/05-fatal_declarations.t
t/06-entities.t
t/99-w3c-not-wf.t
t/w3c/not-wf/ext-sa/001.ent
t/w3c/not-wf/ext-sa/001.xml
t/w3c/not-wf/ext-sa/002.ent
t/w3c/not-wf/ext-sa/002.xml
t/w3c/not-wf/ext-sa/003.ent
t/w3c/not-wf/ext-sa/003.xml
t/w3c/not-wf/not-sa/001.ent

MANIFEST  view on Meta::CPAN

t/50-trailing-whitespace.t
t/trailing-whitespace-in-tags.xml
t/pod-coverage.t
t/pod.t
t/self-closing-optional-trailing-space.xml
t/51-localize-filehandle.t
t/localize-filehandles.xml
ARTISTIC.txt
GPL2.txt
t/52-bugfix-namecharacters.t
t/53-bugfix-cdata-in-attrib.t
t/cdata-in-attrib.xml
t/54-bugfix-bom.t
t/bom-UTF-16-BE.xml
t/bom-UTF-16-LE.xml
t/bom-UTF-8.xml
t/bom-UTF-32-BE.xml
t/bom-UTF-32-LE.xml
t/55-null-chars-in-input.t
t/null-chars.xml
MANIFEST.SKIP
META.yml                                 Module YAML meta-data (added by MakeMaker)

t/53-bugfix-cdata-in-attrib.t  view on Meta::CPAN

use strict;
use lib '.';

use XML::Tiny qw(parsefile);
require "t/test_functions";
print "1..2\n";

$^W = 1;
$SIG{__WARN__} = sub { die("Caught a warning, making it fatal:\n\n$_[0]\n"); };

ok(my $xml = parsefile('t/cdata-in-attrib.xml'), "Don't choke on CDATA in attribs");
is($xml->[0]->{attrib}->{value}, "This ship's name", "parse it correctly");

t/w3c/not-wf/sa/112.xml  view on Meta::CPAN

<doc>
<![cdata[data]]>
</doc>