Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re^2: (XML::Parser) Finding and fixing a bug

by wolis (Scribe)
on Aug 19, 2004 at 05:30 UTC ( #384185=note: print w/ replies, xml ) Need Help??


in reply to Re: (XML::Parser) Finding and fixing a bug
in thread (XML::Parser) Finding and fixing a bug

Hi Matt,

I'm getting a memory leak in some old code I have inherited - it does this:

sub getXMLTree{ my $parser = new XML::DOM::Parser; $tree = ""; if(!open(MYFILE,"$fileName")) { $tree = $parser->parse("<root></root>"); $tree = createHeader($tree); $tree = createBody($tree); }else{ close(MYFILE); $tree = $parser->parsefile($fileName); } $tree = updateHeader($tree); return ($tree); }
$filename being a string like "/tmp/myfile.xml"

Can you (or anyone) clarify, should I change how this is done or get a new version of XML::DOM::Parser (I just installed it last week so I cant see how that would help tho)

___ /\__\ "What is the world coming to?" \/__/ www.wolispace.com


Comment on Re^2: (XML::Parser) Finding and fixing a bug
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (6)
As of 2015-07-03 17:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (54 votes), past polls