Select Code to Download

#!/usr/bin/perl -w
use XML::LibXML;
my $parser = XML::LibXML->new();
...
print "\$nn1 $nn1\n\$nn2 $nn2\n\n";

print $c1->isEqual($c2)?"Equal\n":"Not\n";

$c1ref XML::LibXML::Element $c2ref XML::LibXML::Element
<Z1:Authors/>
<Z2:Authors/>
...
$nn2 Z2:Authors

Not