Branch Coverage

blib/lib/IO/EPP/IRRP.pm
Criterion Covered Total %
branch 0 100 0.0


line true false branch
68 0 0 if ($params->{'conn'}) { }
74 0 0 unless ($code and $code == 1000)
85 0 0 if ($self->can($action)) { }
95 0 0 if $self->{'critical_error'}
99 0 0 unless $answ and ref $answ
104 0 0 wantarray ? :
164 0 0 if ($k =~ /^x-/)
170 0 0 if ($k =~ /^X-/)
175 0 0 if ($extension)
208 0 0 unless $params->{'dname'}
223 0 0 if ($content and $content =~ //)
227 0 0 if ($content =~ m[]*>(.+).+/result>]s)
231 0 0 if ($code != 1000)
234 0 0 if $reason
242 0 0 if ($row =~ /key="([^"]+)" value="([^"]+)"/)
247 0 0 wantarray ? :
250 0 0 wantarray ? :
257 0 0 if (defined $params->{'authinfo'})
342 0 0 if ($content and $content =~ //)
346 0 0 if ($content =~ m[]*>(.+).+/result>]s)
355 0 0 if ($row =~ /key="([^"]+)" value="([^"]+)"/)
360 0 0 wantarray ? :
363 0 0 wantarray ? :
449 0 0 if ($answ =~ /result code=['"](\d+)['"]/)
453 0 0 if ($answ =~ m[]*>(.+).+/result>]s)
459 0 0 if ($rcode == 1000)
463 0 0 if ($row =~ /key="([^"]+)"\s+value="([^"]+)"/)
469 0 0 wantarray ? :
472 0 0 wantarray ? :
484 0 0 if ($params->{'dname'} =~ /\.jp$/)
550 0 0 if ($k =~ /^x-/)
555 0 0 if ($params->{'trade'})
559 0 0 if ($params->{'dname'} =~ /\.xxx$/)
564 0 0 if (defined $params->{'confirm_old_registrant'})
569 0 0 if (defined $params->{'confirm_new_registrant'})
574 0 0 if ($extension)
629 0 0 if ($content and $content =~ //)
633 0 0 if ($content =~ m[]*>(.+).+/result>]s)
642 0 0 if ($row =~ /key="([^"]+)" value="([^"]+)"/)
647 0 0 wantarray ? :
650 0 0 wantarray ? :
684 0 0 if ($content and $content =~ //)
688 0 0 if ($content =~ m[]*>(.+).+/result>]s)
697 0 0 if ($row =~ /key="([^"]+)" value="([^"]+)"/)
702 0 0 wantarray ? :
705 0 0 wantarray ? :
720 0 0 if ($ext =~ m[]+>(.+)]s)
725 0 0 if (/key="([^"]+)"\s+value="([^"]+)"/)
731 0 0 if ($info{$k} =~ /^[A-Z0-9._-]+$/)
736 0 0 if ($info{$k} =~ /\%/)