чтение данных на Perl

Доброе времени суток ! ни как не пойму в чем проблема , когда читаю строку так :

$str = "\xac\xa5\xac\xd1\xac\xdf\xac\xdf\x ac\xed\xac\xd6";

print Encode::encode('cp866',Encode :: decode('cp949', $str)) ;

То все в порядке и печатает слово "Данные".

если считываю из файла ту же вроде строку : \xac\xa5\xac\xd1\xac\xdf\xac\xdf\xa c\xed\xac\xd6

то не печатает слово "Данные" подскажите что не так делаю ! ((

пример (кусок кода):

open(FILE,'0011.txt') or die ("ERROR FILE $!");

while (<FILE>) {

$str = $_;

print Encode::encode('cp866',Encode :: decode('cp949', $str)) ;

}

close(FILE);