больная тема: perl и utf-8

Ну, прям срыв покрывал. Все же расписано в perldoc.

Слудеющий пример выдаёт warning Wide characters in print только если мы печатает $s2

use strict;
use warnings;
use utf8;
my $s1 = "ß";
my $s2 = "тест";
my $s = $ARGV[0] ? $s1 : $s2;
print $s;

Пользуйтесь use common::sense и не будет никаких проблем.

что за common::sense ?

Хакерский вариант use utf8 + use feature (не всё, только основные фишки).

а где по-подробней прочитать?

http://search.cpan.org/perldoc?common::sense

Ну, прям срыв покрывал. Все же расписано в perldoc.

Да, написано, иначе это был бы баг и можно было зарепортить что что-то важное не документировано.

Пользуйтесь use common::sense и не будет никаких проблем.

За исключением того, что как и с ним так и без него эта маленькая программа не будет печатать «ß», т.к. правильный способ выводить символы на экран - binmode STDOUT с указанием кодировки (это тоже есть в perldoc, но кто же его читает..). Этот пример кода демонстрировал Warning, в обучающих целях. А common::sense просто отключает многи варнинги.

Статья зачетная.

Из всех тонкостей (юникод-флаг для Encode::decode, Digest::SHA и т.д.), что ты расписал я не пользовался ни одной. Не потому, что программы были слишком простыми, а потому, что делал простые интерфейсы. А у многих новичков возникают только трудность понимания того, что перл оперирует «сокращенным» вариантом utf8.

cast outtaspace