Branch Coverage

blib/lib/Device/CableModem/SURFboard.pm
Criterion Covered Total %
branch 8 46 17.3


line true false branch
74 0 0 if ($$self{'modelGroup'} eq 'SBV5120E' and $$page_ref =~ /loginUsername/i)
82 0 0 unless $page_ref = pageRef($self, $path)
85 0 0 unless ($tries)
100 0 0 if ($$page_ref =~ / Frequency \s (\d+)\s (Hz) \s (Locked\s)? Signal \s To \s Noise \s Ratio \s ([\d.]+)\s (dB) \s .*? # non-greedy extra stuff for SBV5120E Power \s Level \s ([\d.-]+)\s (dBmV) /xi) { }
120 0 0 if ($$page_ref =~ / ID \s (\d+) \s Frequency \s (\d+)\s (Hz)(\s Ranged)? \s .*? # non-greedy extra stuff for SBV5120E Power(\s Level)?\s ([\d.-]+)\s (dBmV) /xi) { }
148 0 1 if &Scalar::Util::blessed($self)
180 0 0 if $level > $$self{'SNRatioMax'}
181 0 0 if $level < $$self{'SNRatioMin'}
195 0 0 if $level > $$self{'dnPowerMax'}
196 0 0 if $level < $$self{'dnPowerMin'}
210 0 0 if $level > $$self{'upPowerMax'}
211 0 0 if $level < $$self{'upPowerMin'}
218 2 1 if $errfatal
221 0 1 unless ($path)
229 0 1 unless ($modem_ip)
246 1 0 unless connect MODEM, sockaddr_in(80, inet_aton($modem_ip))
249 0 0 if $errfatal
256 0 1 if $errfatal
259 1 0 if ($timeout_failed)
287 0 0 if ($timeout_failed)
306 0 0 if ($timeout_failed)
312 0 0 if ($buf =~ m[^HTTP/\d+\.\d+\s+(\d+)[^\012]*\012])
316 0 0 unless ($code =~ /^2/)