[Moscow.pm] use utf8 & hashes
Sergey Homenkow
hsw на hsw.pp.ru
Ср Фев 20 02:05:13 PST 2008
Приветствую!
Имеем perl v5.8.8 и код:
=====
use utf8;
my %s = (
MaxAccountSize1 => 1,
'MaxAccountSize2' => 1,
);
foreach (sort keys %s) {
print "'$_' ".U($_)." => '".$s{$_}."' ".U($s{$_})."\n";
}
sub U {
return utf8::is_utf8($_[0])?'is_utf8':'not_utf8';
}
=====
Имеем результат:
'MaxAccountSize1' is_utf8 => '1' not_utf8
'MaxAccountSize2' not_utf8 => '1' not_utf8
Кто-нибудь может подсказать почему так получается с ключами хеша?
'-MO=Deparse' показывает:
my(%s) = ('MaxAccountSize1', 1, 'MaxAccountSize2', 1);
т.е. выглядят они одинаково.
Подробная информация о списке рассылки Moscow-pm