File Coverage

blib/lib/Net/DNS/ToolKit/RR/A.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package Net::DNS::ToolKit::RR::A;
2              
3             #use 5.006;
4 7     7   1060 use strict;
  7         13  
  7         316  
5             #use warnings;
6              
7 7     7   37 use vars qw($VERSION @ISA);
  7         13  
  7         1673  
8             require Net::DNS::ToolKit::RR::Template;
9              
10             $VERSION = do { my @r = (q$Revision: 0.02 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
11              
12             @ISA = qw(Net::DNS::ToolKit::RR::Template);
13              
14             *get = \&Net::DNS::ToolKit::RR::Template::get;
15             *put = \&Net::DNS::ToolKit::RR::Template::put;
16             *parse = \&Net::DNS::ToolKit::RR::Template::parse;
17              
18             =cut
19              
20             1;
21             __END__