use XML::Simple;
$file = XMLin('./prod.xml');

foreach $products (@{$file->{product}})	{
    print "Widget: " . $products->{title} ." \n";
    print "Rating: " . $products->{rating} . "\n";
    print "  Cost: " . $products->{cost} . "\n";
    print "Colors: " . $products->{color} . "\n\n";
}