hai i require one more help
i have an xml like this

------------------------------
Code
------------------------------

<?xml version="1.0"?>

<spam-document version="3.5" timestamp="2002-05-13 15:33:45">
<!-- Autogenerated by WarbleSoft Spam Version 3.5 -->
<customer>
<first-name>Joe</first-name>

<surname>Wrigley</surname>
<address>
<street>17 Beable Ave.</street>
<city>Meatball</city>
<state>MI</state>
<zip>82649</zip>
</address>

<email>joewrig...@jmac.org</email>
<age>42</age>
</customer>
<customer>
<first-name>Henrietta</first-name>
<surname>Pussycat</surname>

<address>
<street>R.F.D. 2</street>
<city>Flangerville</city>
<state>NY</state>
<zip>83642</zip>
</address>
<email>m...@263a.org</email>

<age>37</age>
</customer>
</spam-document>

------------------------------

now what i wanted is that i need to fetch the values of tag email and show
them.
how do i do it..
------------------------------
Code
------------------------------

use XML::Simple;

my $conf=XMLin('x.xml',forcearray=>1);
use Data::Dumper;
print Dumper($conf);
print $conf->{timestamp}."\n";
@email=$conf->{customer}->{email};
foreach(@email)
{
        print "$_\n";

}

------------------------------

this code which i worte is not giving any output..
can some one help me..

Chaitanya

Reply via email to