cdata results from the CPAN

cdata

XML-Registry

view release on metacpan or search on metacpan

	
        # print element attribs
	} elsif (ref($tree->[$i]) eq 'HASH') {
	    my $attribs = $tree->[$i];
	    foreach my $attrib (keys(%$attribs)) {
		print " $attrib=".'"'.$attribs->{$attrib}.'"'
	    }
	    # print closing bracket
	    if (scalar(@$tree) > 2) {
		print ">";
	    # no cdata for this element
	    } else {
		print "/>";
	    }

        # print cdata
	} elsif ($tree->[$i] eq 0) {
	    print $tree->[++$i];	    
	}
    }
    
    # close element
    print "\n", " "x$index, "</$el>" if scalar(@$tree) > 2;

    # decrement tree index
    $index--;

examples/REC-xml-19980210.xml view on Meta::CPAN

The target names "<code>XML</code>", "<code>xml</code>", and so on are
reserved for standardization in this or future versions of this
specification.
The 
XML <termref def='dt-notation'>Notation</termref> mechanism
may be used for
formal declaration of PI targets.
</p>
</div2>
 
<div2 id='sec-cdata-sect'>
<head>CDATA Sections</head>
 
<p><termdef id="dt-cdsection" term="CDATA Section"><term>CDATA sections</term>
may occur 
anywhere character data may occur; they are
used to escape blocks of text containing characters which would
otherwise be recognized as markup.  CDATA sections begin with the
string "<code>&lt;![CDATA[</code>" and end with the string
"<code>]]&gt;</code>":
<scrap lang="ebnf">

( run in 0.715 second using v1.01-cache-2.11-cpan-454fe037f31 )