[Moscow.pm] Подскажите пожалуйста, как определить кодировку файла? Надо уметь различать UTF-8, cp1251. Encode::Guess не детектит cp1251.

[Evgeniy Kosov]

On 17.12.2010 19:17, Dmitry Arsentiev wrote:
> Следующий кусок кода:
> my $enc = guess_encoding( $data, qw/euc-jp shiftjis 7bit-jis UTF-8
> utf-8 ascii cp1251/ );
> print "enc = ".$enc->name."\n";
> создаёт такое сообщение:
> Can't locate object method "name" via package "utf-8-strict or utf8"
> (perhaps you forgot to load "utf-8-strict or utf8"?) at ./try2guess.pl
> line 41.

На самом деле тут "utf-8-strict or utf8" -- сообщение об ошибке. В 
случае, когда кодировка определяется однозначно, возвращается объект 
Encode::XS, у которого можно в т.ч. "спросить" name(). Мягко говоря, 
своеобразный интерфейс...

Я бы, наверное, продолжил искать альтернативы, или остановился на том, 
что посоветовал Lars.

-- 
BR,
Evgeniy Kosov