Branch Coverage

blib/lib/WWW/LogicBoxes/Role/Command/Domain.pm
Criterion Covered Total %
branch 0 54 0.0


line true false branch
40 0 0 if ($_ =~ /^No Entity found for Entityid/)
64 0 0 if ($_ =~ /^Website doesn't exist for/)
87 0 0 unless ($original_domain)
101 0 0 if ($args{$contact_type} and $args{$contact_type} != $original_domain->$contact_type) { }
110 0 0 if ($num_changes == 0)
121 0 0 !$args{'is_transfer_locked'} ? :
129 0 0 if ($_ =~ /{registrantcontactid=registrantcontactid is invalid}/) { }
0 0 elsif ($_ =~ /{admincontactid=admincontactid is invalid}/) { }
0 0 elsif ($_ =~ /{techcontactid=techcontactid is invalid}/) { }
0 0 elsif ($_ =~ /{billingcontactid=billingcontactid is invalid}/) { }
162 0 0 if ($_ =~ /^No Entity found for Entityid/)
185 0 0 if ($_ =~ /^No Entity found for Entityid/)
228 0 0 if ($_ =~ /^Privacy Protection not Purchased/)
253 0 0 $args{'status'} ? :
258 0 0 if ($_ =~ /^No Entity found for Entityid/)
286 0 0 if ($_ =~ /^No Entity found for Entityid/) { }
0 0 elsif ($_ =~ /is not a valid Nameserver/) { }
0 0 elsif ($_ =~ /Same value for new and old NameServers/) { }
313 0 0 unless ($domain)
317 0 0 if $domain->status eq 'Deleted'
333 0 0 if ($_ =~ /^No Entity found for Entityid/) { }
0 0 elsif ($_ =~ /A Domain Name cannot be extended beyond/) { }
360 0 0 if ($response->{'raaVerificationStatus'} eq 'Verified')
371 0 0 if $response->{'result'} eq 'true'
372 0 0 if $response->{'result'} eq 'false'
377 0 0 if $_ =~ /You are not allowed to perform this action/
378 0 0 if $_ =~ /No Entity found for Entityid/