Assembling XML in Perl

by

I’ve found it with a bit of digging – set_pi was a red herring. What I really want is:

XML::Twig methods: set_xml_version, set_encoding, and set_doctype. 

use strict;
use warnings;

use XML::Twig;

my $twig = XML::Twig->new( 'pretty_print' => 'indented' );
$twig->set_root(
    XML::Twig::Elt->new(
        'netapp',
        {   version => 1.7,
            vfiler  => "somevfiler",
            xmlns   => "http://www.netapp.com/filer/admin",
        },
    )
);
my $api_req = $twig->root->insert_new_elt('nfs-exportfs-list-rules');
   $api_req ->insert_new_elt( 'pathname', '/vol/path/to/somewhere' );
   $api_req -> insert_new_elt ('your mum' );
   # etc.

$twig->set_doctype('netapp SYSTEM "file:/etc/netapp_filer.dtd"');
$twig->set_xml_version("1.0");
$twig->set_encoding('utf-8');

$twig->print;

Note – to send via LWP, what you’ll need is $request -> content ( $twig -> sprint );

More Related Contents:

  1. How do I create an XML file (in a specific location), containing a given hash? [closed]
  2. Why is XML::Simple Discouraged?
  3. How can I create XML from Perl?
  4. XML vs YAML vs JSON for data feeds in perl application? [closed]
  5. Dealing with malformed XML [duplicate]
  6. How to reference a local XML Schema file correctly?
  7. How to execute XPath one-liners from shell?
  8. xmllint failing to properly query with xpath
  9. What is the correct way to represent null XML elements?
  10. Libraries and tutorials for XML in Delphi
  11. How to replace “single quote” to “double single quote” in XSLT
  12. What’s the difference between an element and a node in XML?
  13. How to convert xsd to human readable documentation? [closed]
  14. XML Attributes vs Elements [duplicate]
  15. How to import XML with nested nodes (parent/child relationships) into Access?
  16. The ‘minOccurs’ attribute cannot be present
  17. Get nodes where child node contains an attribute
  18. Does XML care about the order of elements?
  19. What is the difference between ‘or’ and ‘|’ when programming in xslt?
  20. Can I use variables in XML files?
  21. Set specific font in a styles.xml
  22. How to use node-set function in a platform-independent way?
  23. Edit installed XML file according to user preferences in Inno Setup
  24. “Non Zero Exit Status” R 3.0.1 ‘XML’ and ‘RCurl’
  25. XPath find all elements with specific child node
  26. XML validation with XSD: how to avoid caring about the sequence of the elements?
  27. What is the difference between xsd and xsi?
  28. How do I generate a comma-separated list with XSLT/XPath?
  29. Parsing local XML file using Sax in Android
  30. Matching a node based on a sibling’s value with XPath

Leave a Comment