File Coverage

lib/App/AllKnowingDNS/Zone.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             # vim:ts=4:sw=4:expandtab
2             package App::AllKnowingDNS::Zone;
3              
4 5     5   30 use Mouse;
  5         11  
  5         43  
5              
6             has 'network' => (is => 'rw', isa => 'Str');
7             has 'resolves_to' => (is => 'rw', isa => 'Str');
8             has 'upstream_dns' => (is => 'rw', isa => 'Str');
9              
10             # These are set when adding the zone to the ::Config object.
11             has 'ptrzone' => (is => 'rw', isa => 'Str');
12             has 'aaaazone' => (is => 'rw', isa => 'Regexp');
13              
14             __PACKAGE__->meta->make_immutable();
15              
16             1