Branch Coverage

blib/lib/Net/DRI/Protocol/RRP/Core/Domain.pm
Criterion Covered Total %
branch 21 58 36.2


line true false branch
81 1 0 if $version eq '2.0'
88 0 7 unless defined $domain and $domain
89 0 7 unless $domain =~ /^[a-z0-9]([a-z0-9\-]{0,61}[a-z0-9])?\.[a-z0-9]([a-z0-9\-]{0,61}[a-z0-9])?$/i
90 7 0 if defined $command
103 1 0 if (Net::DRI::Util::has_duration($rd))
106 0 1 unless Net::DRI::Util::isint($period)
110 0 1 if (Net::DRI::Util::has_ns($rd))
121 0 1 unless $mes->is_success
136 0 0 if exists $$rinfo{'domain'}{$oname}{'action'}
157 0 2 unless $mes->is_success
159 2 0 if ($mes->errcode == 211) { }
0 0 elsif ($mes->errcode == 210) { }
174 0 1 unless $mes->is_success
182 0 4 unless $d
189 0 3 unless $d
206 0 0 defined $rd && ref $rd && exists $$rd{'approve'} && $$rd{'approve'} ? :
216 0 3 unless Net::DRI::Util::isa_changes($todo)
217 0 3 if (grep {not /^(?:ns|status)$/;} $todo->types or grep {not /^(?:add|del)$/;} $todo->types('ns') or grep {not /^(?:add|del)$/;} $todo->types('status'))
232 2 1 if (defined $nsadd and not $nsadd->is_empty)
233 2 1 if (defined $nsdel and not $nsdel->is_empty)
236 0 3 if (defined $statadd)
237 0 3 if (defined $statdel)
245 0 0 if (defined $rd and ref $rd eq 'HASH' and keys %$rd)
250 0 0 if defined $curexp xor defined $period
251 0 0 if (defined $curexp)
255 0 0 unless Net::DRI::Util::isint($period)
256 0 0 if ref $curexp and $curexp->can('year')
257 0 0 unless $curexp =~ /^\d{4}$/
262 0 0 if defined $period and defined $curexp