[Moscow.pm] Является ли домен поддоменом? Поиск по большому списку суффиксов

[Andrei]

Хэшем?

Что-то типа:

my %domains = map { $_ => 0 } @domains;

sub is_first_level {
    my ( $domain ) = @_;
    my ( undef, $the_rest ) = split /\./, $domain, 2;
    return exists $domains{ $the_rest };
}

Или я чего-то в задаче не понял?


вс, 23 дек. 2018 г. в 21:56, Александр Поволоцкий via Moscow-pm <
moscow-pm на pm.org>:

> Есть задача - проверить, является ли домен непосредственно поддоменом
> домена верхнего уровня.
>
> Список всех известных таких доменов
> (https://publicsuffix.org/list/public_suffix_list.dat) - 200 килобайт,
> 12000 строк. Делать из этого регексп я немного боюсь.
>
> Как вообще решают нормальные люди такую задачу?
>
> Alex
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
>


-- 
Andrei Protasovitski
< andrei[dot]protasovitski[at]gmail[dot]com >
Diemen, Netherlands
----------- следующая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20181223/6f7c857e/attachment-0001.html>