Net::DNS
版本是1.22。
我正在使用 Net::DNS::RR,当我调用
Net::DNS::RR->string
(或 Net::DNS::RR->print
)时,我对 DS 记录输出中出现的一些随机字符感到有点困惑。 Net::DNS::RR->plain
的输出正是我所期望的。
#!/usr/bin/perl
use strict;
use warnings;
use Net::DNS;
my @rr = rr("gov.uk", "DS");
print STDERR $_->plain . "\n" foreach (@rr);
print STDERR $_->string . "\n" foreach (@rr);
输出如下:
gov.uk. 300 IN DS 17539 8 2 2f0a0a65db9e930f5b2c0425f67df66416c076124652a281d9a8ffa773828f57
gov.uk. 300 IN DS 695 8 2 7277592dbd8993bde70704dbabd30afdbb85057e658ef1428f18f5d9a534bce0
gov.uk. 300 IN DS ( 17539 8 2
2f0a0a65db9e930f5b2c0425f67df66416c076124652a281d9a8ffa773828f57 )
; xerob-pidyk-hukan-vagab-zokod-seced-hetal-tutok-gohys-bityc-ducih-demom-cekup-mazip-lasem-difoh-lixex
gov.uk. 300 IN DS ( 695 8 2
7277592dbd8993bde70704dbabd30afdbb85057e658ef1428f18f5d9a534bce0 )
; xisil-lykud-tazum-nagar-tynib-licot-repat-fydoz-tivam-hicul-vunim-vosag-dofic-metyt-nunuf-gezev-byxex
可以看到,
plain
响应符合预期,同时string
输出在记录后有一堆看似随机的字符(xerob-pidyk-huk...
)。
任何人都可以了解这里发生的事情吗?
如果安装了 Digest::BubbleBabble,您会收到 thost 评论。
它是记录中摘要的另一种表示形式。
$ alias babble_encode='perl -e'\''
use v5.38;
use Digest::BubbleBabble qw( bubblebabble );
say bubblebabble( Digest => pack( "H*", $ARGV[0] ) );
'\'''
$ babble_encode 2f0a0a65db9e930f5b2c0425f67df66416c076124652a281d9a8ffa773828f57
xerob-pidyk-hukan-vagab-zokod-seced-hetal-tutok-gohys-bityc-ducih-demom-cekup-mazip-lasem-difoh-lixex
$ babble_encode 7277592dbd8993bde70704dbabd30afdbb85057e658ef1428f18f5d9a534bce0
xisil-lykud-tazum-nagar-tynib-licot-repat-fydoz-tivam-hicul-vunim-vosag-dofic-metyt-nunuf-gezev-byxex