Проблема с XML::Parser.

[Versatile]

Наткнулся на проблему следующего характера: есть файл xml (не важно какого содержания), есть package в котором функция прасинга и есть перловый скрипт, который эту ф-цию вызывает.
в итоге выполнения, создается впечатление, что парсер переключает кодировку вывода в utf. такого по идее быть не должно. может кто-то сталкивался с подобным?
еще интересно, что в другом скрипте, где используется тот же парсер все проходит нормально.

вызов парсера:
   my $parser = new XML::Parser(Style => "Subs");
   $parser->setHandlers(Start => \\&start_tag,
            End => \\&end_tag);
   my @tree = $parser->parsefile($ConfigFile);

вызов функции:
   use CGI::Carp qw/fatalsToBrowser/;
   open(STDERR, ">&STDOUT");
   select(STDOUT); $| = 1;
   select(STDERR); $| = 1;

   ParseConfig::parse_main_config("config.xml");

далее идет коннект к базе и т.д. и в конце:
   print "Content-type: text/html\\n\\n";
   print $c; # Сюда собирается вся страничка

[ondr]

perldoc XML::Parser

...
Whatever the encoding in the original document, the string is returned to the handler in UTF-8.
...