Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re^3: WURFL web browsers patch and XML::Simple

by jonnyfolk (Vicar)
on Dec 14, 2009 at 12:04 UTC ( #812695=note: print w/replies, xml ) Need Help??

in reply to Re^2: WURFL web browsers patch and XML::Simple
in thread WURFL web browsers patch and XML::Simple

Ah, ok. So what I need to do to make it work is:

foreach my $browser ( %{$data->{devices}->{device}} ) { print "$data->{devices}->{device}->{$browser}->{user_agent}<br>"; }

I think that is an improvement on where I started as it goes into the heart of the data structure rather than disassembling it. However perhaps there is more that can be done?

Update:The inclusion of values in jethro's update effectively fixes the problem, the solution direct and concise.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (3)
As of 2017-10-23 23:24 GMT
Find Nodes?
    Voting Booth?
    My fridge is mostly full of:

    Results (285 votes). Check out past polls.