Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re^4: If exists (hash)

by packetstormer (Monk)
on Oct 06, 2011 at 15:09 UTC ( #930000=note: print w/replies, xml ) Need Help??

in reply to Re^3: If exists (hash)
in thread If exists (hash)

Thanks for replying. I did read those threads (in fact I started one of them) but still being relatively new to perl I am having trouble. I notice the following:

My code will retrieve XML results from a web page. The value below will always have data:


Mostly it will be just a folder path. However, sometimes it could be more than one path in which case the following is returned:

'result' => { 'covers' => {'1' => {'content' => '/mypath/nevr/9smith/' }, '2' => {'content' => '/mypath/nevr/9-dssmith/' }

So when the XML appears I should look for $result->{covers}->{1}->{content}
but this is where the error appears. I'm gonna read up some more and maybe I'll figure it out.
Thanks for the replies though.

Replies are listed 'Best First'.
Re^5: If exists (hash)
by choroba (Bishop) on Oct 06, 2011 at 15:12 UTC
    I guess you want to check 'HASH' eq ref $xml->{result}{covers}
      Excellent! Thanks. I didn't know anything about "ref" but that is exactly what I needed. I can now do a check to see if its a value of a hashref and then do as I need from there.
      Thanks very much! Working perfect now!
Re^5: If exists (hash)
by Anonymous Monk on Oct 06, 2011 at 15:30 UTC

    . I'm gonna read up some more and maybe I'll figure it out.

    Or you could simply use Data::Diver and be done with it

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://930000]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (9)
As of 2018-06-21 19:51 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (119 votes). Check out past polls.