Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

XML Adding Node Problem.

by huchister (Acolyte)
on Oct 23, 2012 at 19:53 UTC ( #1000516=perlquestion: print w/replies, xml ) Need Help??
huchister has asked for the wisdom of the Perl Monks concerning the following question:

Greetings, I am trying to load up move XML variable and 'attribute' to another XML file. However, I am having trouble using XML::Bare. Here is the source.xml that I want to move.
<vars> <field name="loc" val="{$loc}" type="static" /> <field name="fullURL" val="http://www.dasite.com" type="static" /> <field name="locinfo" val="{$location=~ tr/a-z/A-Z/;}" type="stati +c" /> </vars>
Here is the part of code that I am having problem with. ex) moving.pl
use XML::Bare qw/xget xval forcearray/; . . . . my $fields = XML::Bare::forcearray( $config->{'field'} ); $ob->add_node($rxml, 'vars', $fields); . . . .
In result from destination.xml
<multi_vars /> <vars> <ARRAY(0xeea3ac0) /> </vars>
I want the result to be....
<multi_vars /> <vars> <loc /> <fullURL /> <locinfo /> </vars>
In which loc, fullURL, locinfo contains value from source.XML Please recommand me a useable XML base, I was thinking somehow I can pass $fields variable in string format.......

Replies are listed 'Best First'.
Re: XML Adding Node Problem.
by roboticus (Chancellor) on Oct 23, 2012 at 21:12 UTC

    huchister:

    It appears that the reason you're getting <ARRAY(0xeea3ac0)> in there is because you're handing an array of nodes to a function that expects to add a single node to the XML tree. Perhaps it might work if you add them one at a time--maybe like this:

    $ob->add_node($rxml, 'vars', $_) for @$fields;

    Caveat: I've never used XML::Bare, so I may have misdiagnosed or some such.

    ...roboticus

    When your only tool is a hammer, all problems look like your thumb.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1000516]
Approved by Corion
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (7)
As of 2017-09-25 12:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    During the recent solar eclipse, I:









    Results (280 votes). Check out past polls.

    Notices?