You are going to probably need more than just a short example. You are going to need to read the fine manual: XML::Simple. But here is a script you can play with in the meantime:

use strict;
use warnings;

use Data::Dumper;
use XML::Simple;

my $xml = XMLin('amazon.xml');

# print url attrib from <Details>
print $xml->{Details}{url}, "\n";

# print each rating
print $_->{Rating}, "\n" for @{ $xml->{Details}{Reviews}{CustomerRevie
+w} };

# uncomment this line to print the entire data structure
#print Dumper $xml;
[download]

On another note, if you need to transform that XML into something else (a template?), then a better tool is most likely the XML::LibXML - XML::LibXSLT combo.

There are so many options when it comes to parsing XML in Perl that it can be overwhelming at first. I recommend you buy a book: check out the site reviews for Perl & XML and XML and Perl. Also, give Ways to Rome a quick, shallow glance. It's probably too complex for you right now, but a quick glance will show you just how many options you have at your disposal. Good luck. :)

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)