August 29, 2008 10:16pm pdt

1. Adam314 558,667
2. ozo 370,137
3. FishMonger 115,555
4. Tintin 91,647
5. hielo 63,970
6. mjcoyne 58,453
7. nedfine 41,965
8. ravenpl 24,800
9. clockwatc... 24,260
10. teraplane 22,380
11. ahoffmann 21,299
12. kawas 19,050
13. oleber 18,450
14. omarfarid 17,068
15. suhasbha... 16,570
16. marchent 13,540
17. nixfreak 12,200
18. nognew 10,600
19. hernst42 10,080
20. agriesser 10,000
21. SmartIntel 9,760
22. sentner 9,648
23. ddrudik 9,100
24. shanikawm 7,996
25. evilrix 7,500

1. ozo 3,641,902
2. Adam314 1,481,086
3. Tintin 739,941
4. kandura 579,965
5. jmcg 517,810
6. mjcoyne 510,591
7. FishMonger 468,189
8. maneshr 385,976
9. teraplane 366,588
10. manav_m... 338,348
11. clockwatc... 240,548
12. rj2 211,481
13. ahoffmann 206,862
14. davorg 153,165
15. Tim_Utsc... 113,107
16. shlomoy 109,110
17. gripe 98,559
18. suhasbha... 91,970
19. Perl_Diver 82,106
20. sstouk 74,470
21. jhurst 72,319
22. rugdog 70,891
23. hielo 69,920
24. nedfine 69,532
25. ZiaTioN 66,995

05.24.2008 at 10:49AM PDT, ID: 23429991

	[x] Attachment Details

Using Perl and XML::Simple to parse XML file

Asked by michaelshavel in Perl Programming Language, Extensible Markup Language (XML)

Tags: perl

Hi,
I am trying to parse and XML file from weather.com. The file they send is pretty complicated so I wanted to first try a simpler file -- I tried the example given in the docs for XML::Simple. I can't get the example to print out individual element data
I've included the perl code and the XML file.

If I print the "Dumper ($config)" out I get the data.

If I try and print an individual element out though with either of the lines below, I just get a "use of uninitialized value" message. I've tried every combination I can think of to print out individual element data out but I just can't get the sytax correct. Thanks for your help and suggestions.
print $config->{logdir};
print $config->{server}->{kalahari}->{address}->[1];

Possibly XML::Simple isn't what I need. Any other ideas?
Start Free Trial

         
           
             1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:

           
           
             #!/usr/bin/perl -w
 
 
#Used to get weather data from weather.com 
use LWP::Simple;
use XML::Simple qw(:strict);
use Data::Dumper;
 
#$url="http://xoap.weather.com/weather/local/02314?cc=*&dayf=5&link=xoap&prod=xoap&par=1065087128&key=f881060f95a12e6b";
$url="test.xml";
 
my $weatherdata = get($url);
 
my $xs = XML::Simple->new(ForceArray => 1, KeepRoot => 1, KeyAttr=>[]);
my $config = $xs->XMLin($weatherdata);
 
#print Dumper($config);  #Printing this out works fine. 
print $config->{logdir};
print $config->{server}->{kalahari}->{address}->[1];
 
 
-------
<config logdir="/var/log/foo/" debugfile="/tmp/foo.debug">
    <server name="sahara" osname="solaris" osversion="2.6">
      <address>10.0.0.101</address>
      <address>10.0.1.101</address>
    </server>
    <server name="gobi" osname="irix" osversion="6.5">
      <address>10.0.0.102</address>
    </server>
    <server name="kalahari" osname="linux" osversion="2.0.34">
      <address>10.0.0.103</address>
      <address>10.0.1.103</address>
    </server>
  </config>

           
         

Keywords: Using Perl and XML::Simple to parse…

	Title
1	Perl Xml RPC
2	downloading xml data
3	XML Parsing
4	perl script to transform xml into csv or …
5	PERL XML: how to read xml and assi…
6	Sorting XML according to attributes in P…

Loading Advertisement...

20080716-EE-VQP-32 / EE_QW_2_20070628

Using Perl and XML::Simple to parse XML file

Asked by michaelshavel in Perl Programming Language, Extensible Markup Language (XML)

Tags: perl

About this solution