Код скрипта:

use XML::LibXML;
my $parser=XML::LibXML->new();

my $xmlpage=$parser->parse_string("<?xml version=\"1.0\" encoding=\"windows-1251\"?><root/>");
my $root=$xmlpage->getDocumentElement();

my @errors=();
# здесь идёт заполнение массива @errors

if (scalar(@errors)>0)
{
my $elist=$xmlpage->createElement("Errors");
foreach my $erdescr (@errors)
{
my $error=$xmlpage->createElement("Error");
$error->setAttributeNode($xmlpage->createAttribute("Descr",$erdescr));
$elist->appendChild($error);
}
$root->appendChild($elist);
}

Что не так в этом коде?
У меня почему-то в результате $xmlpage выглядит как невалидный xml, точнее даже создаётся такое ощущение, что он не до конца сформирован.

Очень рассчитываю на вашу помощь.

Подробнее напишити что за ошибка... сюда ее запостете ...

Проблема решилась принудительной конвертацией массива @errors в utf. И ведь знала же, что DOM требует utf, знала...

Всем спасибо за помощь.