Parsing.pl

sub parse{

my $parser = XML::LibXML->new();
my $tree = $parser->parse_file($file);
open (my $FhResultat, '>', $FichierResultat );
my $root = $tree->getDocumentElement;
my @productname = $root->getElementsByTagName('product');

	foreach my $child (@productname){
		print {$FhResultat}
		$child->getElementsByTagName('name')->[0]->getFirstChild->getData, "\t",
		$child->getAttribute('category_id'),"\t",
		$child->getAttribute('id'), "\t",
		$child->getElementsByTagName('desc_short')->[0]->getFirstChild->getData, "\n";
}

##</code><code>##

 
products.xml

<product category_id="13296" id="675936193" catalog="false" row="1">
            <name>Children's Hand Rake</name>
            <imageURL_med></imageURL_med>
            <desc_short>Mini gardeners can dig, rake and scoop out their own plot with this children's hand rake, complete with contoured handles and durable metal heads.</desc_short>
</product>