view release on metacpan or  search on metacpan

ex/test.pl  view on Meta::CPAN

my $hash = $parser->parse(
	q{<root at="key">
		<nest>
			<!-- something commented -->
			first
			<v>a</v>
			mid
			<!-- something commented -->
			<v at="a">b</v>
			<vv><![CDATA[ cdata <<>> content ]]></vv>
			last
		</nest>
	</root>},
);
print +Dumper $hash;