author | Heiko Schlittermann (JUMPER) <hs@schlittermann.de> |
Wed, 21 Jan 2015 23:07:59 +0100 | |
changeset 66 | 04e08079f218 |
parent 65 | 0f7e871c4672 |
child 67 | 760a2752983c |
lib/DNS/Vi.pm | file | annotate | diff | comparison | revisions |
--- a/lib/DNS/Vi.pm Wed Jan 21 23:07:35 2015 +0100 +++ b/lib/DNS/Vi.pm Wed Jan 21 23:07:59 2015 +0100 @@ -26,8 +26,6 @@ my $data = shift; my @lines = split /\n/, $data; - ### @lines - my @zone; my ($origin, $ttl, $last_label, $soa_seen); @@ -101,15 +99,11 @@ } my $id = sha512_hex(join "\0", sort %rrset); push @zone, { id => $id, rrset => \%rrset }; + ### x: $zone[-1] } } } - # list of { - # id => $id, - # rrset => { label => …, ttl => …, rrtype => …, data => … } - # } - ### @zone return @zone; }