Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re^3: How to fetch a portion of a XML file to save it in another xml file

by Your Mother (Canon)
on Sep 07, 2013 at 20:06 UTC ( #1052841=note: print w/ replies, xml ) Need Help??


in reply to Re^2: How to fetch a portion of a XML file to save it in another xml file
in thread How to fetch a portion of a XML file to save it in another xml file

Oh, ok! You wore me out and I wrote it yesterday and there's no reason for it to die of bitrot in some corner of my disk. I do hope you will try to pick up a little of it and not just get others to write it for you.

my $doc = XML::LibXML->new->load_xml( string => $before ); my @tests = $doc->findnodes('/suite/test[@name="Import Test Suite"]'); my $suite = $doc->getDocumentElement; $suite->removeChildNodes; $suite->addChild($_) for @tests; print $doc->serialize(1); # or $doc->toFile("new.xml")


Comment on Re^3: How to fetch a portion of a XML file to save it in another xml file
Download Code
Re^4: How to fetch a portion of a XML file to save it in another xml file
by tarunmudgal4u (Sexton) on Sep 13, 2013 at 05:40 UTC

    Superb.. :)

    Let me make a try and i'll get back to you :)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1052841]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (5)
As of 2014-09-21 12:14 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (168 votes), past polls