Select Code to Download

use XML::Twig;
my $twig = XML::Twig->new(keep_encoding => "true");
...
    $product{nome} =~ s/\s+//g;    
    ......................
}

<produtos>
     <produto>
...
    </produto> 
......
</produtos>