Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re: Problem with a Ref to a global variable while using XML::Parser

by clintp (Curate)
on May 28, 2002 at 23:50 UTC ( #169934=note: print w/ replies, xml ) Need Help??


in reply to Problem with a Ref to a global variable while using XML::Parser

I think you answered your own question (Effectively deal with the global hash variable (by redefining it?)). Can't you just let the last thing on @stories be the hash reference and not even deal with the hash?

sub StartTag { # Other stuff okay... but add.. if ($tag eq 'story') { push @stories, {}; } } # This subroutine is mostly superflous now I think... sub EndTag { pop @curr; } sub Text { unless ($curr[-1] eq 'story') { $stories[-1]->{$curr[-1]} = $_; } }
And that might do it. (untested)


Comment on Re: Problem with a Ref to a global variable while using XML::Parser
Download Code
Re: Re: Problem with a Ref to a global variable while using XML::Parser
by beamsack (Scribe) on May 29, 2002 at 03:39 UTC
    And that did it clintp!
    The script now works as expected.
    And thanks to crazyinsomniac for the recommendations.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (4)
As of 2014-07-10 04:55 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    When choosing user names for websites, I prefer to use:








    Results (199 votes), past polls