при выполнении, пишет:



как быть? Надо строку $login переделать в UTF-8

Perl_sapiens, похоже, у Вас что-то не в порядке с модулем Encode (а может, еще с чем-то в дистрибутиве perl). Попробуйте просто переустановить perl. 

Но Ваш код все равно не сработал бы. Функция encode перекодирует в указанную кодировку уже декодированную строку (т.е. строку, находящуюся во внутреннем представлении perl). Для декодирования служит функция decode, которой нужно указывать текущую кодировку строки.
$str = encode("utf8", decode('cp1251', $login));

Функции encode и decode импортируются модулем по умолчанию, т.е. qw(encode) не обязательно.

В подтверждение слов amg:





т.е. если не перекодировать из cp1251 во внутрений формат, encode() сработает, но вернет неверный результат, т.к. не умеет определять кодировку символов самостоятельно.

Это сообщение отредактировал(а) ginnie - 8.5.2008, 09:36

Эм... не, переустановка не помогла(((
ginnie, вот даже твой код взял, но всеравно попа:

D:\usr\_SCRiPTS_\test_encode.pl:


Консоль:


блин.... чеж делать то?

Perl-дистрибутив взят из дистрибутива DENWER.

Это сообщение отредактировал(а) Perl_sapiens - 8.5.2008, 19:48

Perl_sapiens, скачайте нормальный перл, в денвере перл урезаннный

Окей. А на сколько урезанный?(я не про miniperl.exe говорю, а про скаченное расширение)
----
Всё, проблему решил: взял АктивПерл, подредактировал пути в его файлах(точнее в файлах перла) и все заработало как часы.

Это сообщение отредактировал(а) Perl_sapiens - 9.5.2008, 00:06

А можно поподробнее: какие пути в каких файлах и как подправили?