Perlmonks In the sample xsl, xml and perl code below I'm trying to test fromDOMtoHash. When I run the code I get You must specify a XML::DOM::Document has the XML parameter at ./test.pl line 21 Although my unserstanding is that the $results arg was a DOM object when it was returned by transform. If I print $result I get XML::DOM::DocumentFragment=ARRAY(0x76b37c) Which seems to clearly indicate it is a DOM object.

XSL

<?xml version="1.0" encoding="UTF-8"?>
   <xsl:stylesheet
     xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"
     xmlns:test="urn:test">
   <xsl:template match="/">

     <xsl:variable name="matched" select="test:match_names('title | ti
+tulo | titre | titolo', . )" 
/>

     <xsl:for-each select="$matched">
       <xsl:copy-of select="." />
     </xsl:for-each>

   </xsl:template>
   </xsl:stylesheet>

[download]

XML

<list>
    <title>System</title>
    <TituloGrande>Products</TituloGrande>
    <sublist>
       <SubTitleOne>Book</SubTitleOne>
    </sublist>
</list>

[download]

CODE

#!/bin/perl

# import required modules
use XML::XSLT;
use XML::Hash;
use Data::Dumper;

# define local variables
my $xslfile = "test.xsl";
my $xmlfile = "test.xml";

# create an instance of XSL::XSLT processor
my $xslt = XML::XSLT->new ($xslfile, warnings => 0, debug => 0);

# transforms the XML file using the XSL style sheet
my $results = $xslt->transform ($xmlfile);
print $results;

# Convertion from a XML::DOM::Document into a HASH
my $xml_converter = XML::Hash->new();
my $xml_hash = $xml_converter->fromDOMtoHash($results);

# send to output
print Dumper($xml_hash);

# free up some memory
$xslt->dispose();

[download]

In reply to XML::Hash fromDOMtoHash by mcdon_is

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.