$newxml = qq~ My Name My image My Brochure ~; my $xml = new XML::Simple(ForceArray => 1, KeyAttr => [], KeepRoot => 1, SuppressEmpty => ''); my $data = $xml->XMLin(\$newxml); #print $data->{'name'}; print $data->{'namepairs'}->{'name'}; #print Dumper($data); exit;