<?xml version="1.0" encoding="windows-1252"?>
<node id="827906" title="data extraction XML::Simple" created="2010-03-10 16:51:24" updated="2010-03-10 16:51:24">
<type id="115">
perlquestion</type>
<author id="204547">
jonnyfolk</author>
<data>
<field name="doctext">
Trying to organise some diving gear, I'm drawing a blank on extracting the data.  Could someone explain where I'm going wrong, please?
&lt;code&gt;
$newxml = qq~
          &lt;water_sports&gt;
&lt;Tenders_+_toys&gt;- 1x 4.45m Tender Williams 445 Sportjet
- 1x 3.51m Tender Arimar Top Line 360
- 1xJet ski Yamaha GP1300R
- banana/kayak
- water skiing/snorkelling equipment
&lt;/Tenders_+_toys&gt;
&lt;/water_sports&gt;
~;


$newxml =~ s/\+/and/g;


my $xml = new XML::Simple;

my $data = $xml-&gt;XMLin(\$newxml);

print $data-&gt;{'water_sports'}-&gt;{'Tenders_and_toys'};

&lt;/code&gt;</field>
</data>
</node>
