DNS, отвечающий на запросы со стороны скрипта

Основная задача ДНС - получение IP-адреса по имени хоста.

Он технически не в состоянии проверять это.

Подтвердить наличие Вам может только веб-сервер, запущенный, на машине с этим IP адресом.

Кроме основной задачи есть и масса иных возможностей, если они включены.

Нужен DNS, который отзовется на это:

use Net:: DNS;

my $a = new Net:: DNS:: Resolver;

$a->nameservers($dns);

my @m = mx($a, $url);