Branch Coverage

blib/lib/EasyDNS/DDNS.pm
Criterion Covered Total %
branch 13 40 32.5


line true false branch
37 0 2 unless $cfg->{'ok'}
41 0 2 $args{'dry_run'} ? :
44 0 2 unless @$hosts
47 2 0 unless ($dry_run)
49 0 2 unless $r->{'username'}
50 0 2 unless $token
65 0 2 if (not $current_ip) { }
67 0 0 unless $current_ip
69 0 2 unless $current_ip =~ /^(\d{1,3}\.){3}\d{1,3}$/
74 1 1 if ($last_ip and $last_ip eq $current_ip)
84 0 1 if ($dry_run)
103 0 1 unless ($parsed->{'ok'})
123 0 0 unless $body =~ /^(\d{1,3}\.){3}\d{1,3}$/
139 1 0 if $u =~ /\bOK\b/
140 0 0 if $u =~ /\bNOERROR\b/
142 0 0 if $u =~ /\bNOACCESS\b/
143 0 0 if $u =~ /\bNO_AUTH\b/ or $u =~ /\bNOAUTH\b/
145 0 0 if $u =~ /\bTOOSOON\b/
146 0 0 if $u =~ /\bNOSERVICE\b/
147 0 0 if $u =~ /\bILLEGAL\b/