use Data::Dump;
my $price;
while($reader->read) {
	next unless $reader->nodeType==XML_READER_TYPE_ELEMENT;
	dd $reader->localName, $reader->readInnerXml;
	$price = $reader->readInnerXml if $reader->localName eq 'price';
}
dd "price", $price;