5 мая 2017 г., 9:57 пользователь Евгений Косов via Moscow-pm <[email protected]> написал: > Александр, > > А если не нарушать инкапсуляцию и использовать $rr->address вместо > $rr->{address}, не станет ли лучше?
+1 > ЗЫ: для MX-записей "address" не определён. Доступные методы для каждого типа записи описаны в документации по Net::DNS::RR::*. Соответственно для A-записей в https://metacpan.org/pod/Net::DNS::RR::A, для MX - https://metacpan.org/pod/Net::DNS::RR::MX, ну и т.д. > WBR, > Евгений > > Friday, мая 5, 2017 9:42 AM +03:00 from Александр Фролов via Moscow-pm > <[email protected]>: > > > Пытаюсь использовать Net::DNS::Resolver на Perl v5.20.2 built for > x86_64-linux-gnu-thread-multi, Debian 8.7: > > my $res = Net::DNS::Resolver->new(debug => 1); > my $query = $res->search('ya.ru'); > if ($query) > { > foreach my $rr ($query->answer) > { > next unless ($rr->type eq "A") or ($rr->type eq "MX"); > my $address = $rr->{address}; > print $rr->string."\n"; > print $rr->{ address }."\n"; > } > } > > При попытке вывести на консоль $rr->{ address } получаю нечитаемую строку, > хотя в $rr->string все нормально: > > ya.ru. 2015 IN A 87.250.250.242 > W--- > > Подскажите, пожалуйста, в чем может быть проблема? > > С уважением, > Александр Фролов > > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org > > > > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org > -- Best regards, Ilya Chesnokov -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
