Branch Coverage

blib/lib/WWW/OPG/Scraper.pm
Criterion Covered Total %
branch 0 28 0.0


line true false branch
57 0 0 if ref $class
62 0 0 if (exists $$params{'useragent'}) { }
86 0 0 unless ref $self
91 0 0 unless $r->is_success
94 0 0 if ($r->content =~ m[ ([0-9]+),?([0-9]+)\ MW ]x)
100 0 0 if ($r->content =~ m[ Last\ updated:\ (\d+)/(\d+)/(\d+)\ (\d+):(\d+):(\d+)\ (AM|PM) ]x)
106 0 0 if ($hour == 12) { }
0 0 elsif ($7 eq 'PM') { }
108 0 0 if ($7 eq 'AM')
126 0 0 if (not exists $$self{'updated'} or $$self{'updated'} != $dt)
150 0 0 unless ref $self
152 0 0 unless exists $$self{'power'}
167 0 0 unless ref $self
169 0 0 unless exists $$self{'updated'}