Использование perl, поскольку язык не был упомянут, простите за ржавчину ...
([^.]+\.[^.]+$)
это регулярное выражение выдаст вам домен первого экземпляра в виде захваченной строки ($ 1). Вы можете использовать эту захваченную строку, если это, скажем, perl, вот так, чтобы увидеть, совпадают ли они.
$firstHostName =~ /([^.]+\.[^.]+$)/;
if ($secondHostName =~ /$1$/) {
print "same domain";
}