Xml Encode

XML::Simple::DTDReader is a simple XML file reading based on their DTDs. SYNOPSIS use XML::Simple::DTDReader; my $ref = XMLin("data.xml"); Or the object oriented way: require XML::Simple::DTDReader; my $xsd = XML::Simple::DTDReader->new; my $ref = $xsd->XMLin("data.xml");...

XML::MyXML is a simple XML module. SYNOPSIS use XML::MyXML qw(tidy_xml xml_to_object); my $xml = "< item >< name >Table< /name >< price >< usd >10.00< /usd >< eur >8.50< /eur >< /price >< /item >"; print tidy_xml($xml); my $obj = xml_to_object($xml); print "Price in Euros = " ....

XML::DOM::XML_Base Perl module can apply xml:base to attribute values. SYNOPSIS use XML::DOM::XML_Base; my $parser = XML::DOM::Parser->new(); my $xml = qq( ); # build the DOM my $dom = $parser->parse( $xml ); # get some elements my $endo = $dom->getElementsByTagName(...


Platforms: *nix

Test::Unit::Runner::XML is a Perl module that can generate XML reports from unit test results. SYNOPSIS use Test::Unit::Runner::XML; mkdir("test_reports"); my $runner = Test::Unit::Runner::XML->new("test-reports"); $runner->start($test); exit(!$runner->all_tests_passed());...


Platforms: *nix

SYNOPPSIS use LWP::Simple use XML::Parser; use XML::Parser::YahooRESTGeocode; #connect to yahoo geocode service my $url = http://api.local.yahoo.com/MapsService/V1/geocode; my $get = appid=YahooDemo&street=701+First+Street&city=Sunnyvale&state=CA; #call yahoo geocode service my $xml =...


Platforms: *nix

XML::Descent is a Perl module for recursive descent XML parsing. SYNOPSIS use XML::Descent; # Create parser my $p = XML::Descent->new({ Input => $xml }); # Setup handlers $p->on(folder => sub { my ($elem, $attr) = @_; $p->on(url => sub { my ($elem, $attr) = @_; my $link = { name...


Platforms: *nix

Template::Plugin::XML::Style is a Perl module for simple XML stylesheet transformations. SYNOPSIS [% USE xmlstyle table = { attributes = { border = 0 cellpadding = 4 cellspacing = 1 } } %] [% FILTER xmlstyle %] < table > < tr > < td >Foo< /td > < td >Bar< /td > < td >Baz< /td >...


Platforms: *nix

Template::Plugin::XML is a XML plugin for the Template Toolkit. SYNOPSIS [% USE XML; dom = XML.dom(foo.xml); xpath = XML.xpath(bar.xml); simple = XML.simple(baz.xml); rss = XML.simple(news.rdf); %] [% USE XML(file=foo.xml); dom = XML.dom xpath = XML.xpath # ...etc... %] [% USE...


Platforms: *nix

Template::Plugin::XML::Simple is a plugin interface to XML::Simple. SYNOPSIS # load plugin and specify XML file to parse [% USE xml = XML.Simple(xml_file_or_text) %] This is a Template Toolkit plugin interfacing to the XML::Simple module..


Platforms: *nix

XML::Namespace is a Perl module with simple support for XML Namespaces. SYNOPSIS Example 1: using XML::Namespace objects use XML::Namespace; my $xsd = XML::Namespace->new(http://www.w3.org/2001/XMLSchema#); # explicit access via the uri() method print $xsd->uri(); #...


Platforms: *nix

XML::Schema::Type::Simple is a base class for simple XML Schema datatypes. SYNOPSIS package XML::Schema::Type::whatever; use base qw( XML::Schema::Type::Simple ); use vars qw( @FACETS ); @FACETS = ( minLength => 10, maxLength => 30, otherFacet => { value => $n, fixed => 1,...


Platforms: *nix

Template::Plugin::XML::DOM is a plugin interface to XML::DOM. SYNOPSIS # load plugin [% USE dom = XML.DOM %] # also provide XML::Parser options [% USE dom = XML.DOM(ProtocolEncoding = ISO-8859-1) %] # parse an XML file [% doc = dom.parse(filename) %] [% doc = dom.parse(file =...


Platforms: *nix

XML::Diff is a Perl module for XML DOM-Tree based Diff & Patch Module. SYNOPSIS my $diff = XML::Diff->new(); # to generate a diffgram of two XML files, use compare. # $old and $new can be filepaths, XML as a string, # XML::LibXML::Document or XML::LibXML::Element objects. # The diffgram...


Platforms: *nix

XML::Diff is a Perl module for XML DOM-Tree based Diff & Patch Module. SYNOPSIS my $diff = XML::Diff->new(); # to generate a diffgram of two XML files, use compare. # $old and $new can be filepaths, XML as a string, # XML::LibXML::Document or XML::LibXML::Element objects. # The diffgram...


Platforms: *nix

XML::All is a Perl module that contains overloaded XML objects. SYNOPSIS use XML::All; Â my $xml = < < a href=/ >1 < b >2< /b > < em >3< /em >< /a > >; Â print $$xml; # a print join ", ", @$xml; # 1, < b >2< /b >, < em >3< /em > print join ", ", %$xml; # href, / Â print $xml->b();...


Platforms: *nix

XML::Literal is a Perl module with syntax support for XML literals. SYNOPSIS # This is not a source filter: it just augments glob(). use XML::Simple; use XML::Literal &XMLin; # Simple element my $xml1 = < hr/ >; # With variable interpolation my $xml2 = < input value=$ARGV[0] / >; #...


Platforms: *nix

Encode::HanExtra Perl module contains extra sets of Chinese encodings. SYNOPSIS use Encode; # Traditional Chinese $euc_tw = encode("euc-tw", $utf8); # loads Encode::HanExtra implicitly $utf8 = decode("euc-tw", $euc_tw); # ditto # Simplified Chinese $gb18030 = encode("gb18030",...


Platforms: *nix

XML::Essex::Event is a base event class, also used for unknown event types. Stringifies as $event->type . "()" to indicate an event that has no natural way to represented in XML, or for ones that havent been handled yet in Essex. Methods new XML::Event->new( a => 1, b => 2 );...


Platforms: *nix

XML::Filter::Dispatcher::Compiler can compile rulesets in to code. SYNOPSIS use XML::Filter::Dispatcher::Compiler qw( xinline ); my $c = XML::Filter::Dispatcher::Compiler->new( ... ) my $code = $c->compile( Package => "My::Filter", Rules => [ a/b/c => xinline q{warn "found a/b/c"}, ],...


Platforms: *nix

XML::Filter::DocSplitter does multipass processing of documents. SYNOPSIS ## See XML::SAX::???? for an easier way to use this filter. use XML::SAX::Machines qw( Machine ) ; my $m = Machine( [ Intake => "XML::Filter::DocSplitter" => qw( Filter ) ], [ Filter => "My::Filter" => qw( Merger...


Platforms: *nix