Ну вот, добрался прогресс и до нас. Сегодня пришло тех.задание проапдейтить мой SEO-инструмент, что б можно было использовать домены в зоне .рф. Казалось бы что тут сложного, а не тут-то было, из четырех опробованных готовых библиотек, найденных на CPAN, только одна корректно отработала.
sub puny_encode_domain {
$domain = shift;
@puny_words = ();
foreach $d (split(/\./, $domain)) {
if ($d !~ m/[a-zA-Z]/i) {
$d = URI::UTF8:
}
push(@puny_words, $d);
}
$result = join('.', @puny_words);
return $result;
}
вроде работает.