line |
true |
false |
branch |
132
|
0 |
0 |
unless ($$self{'http'}->request('http://www.random.org/cgi-bin/checkbuf') == 200) |
138
|
0 |
0 |
unless ($$self{'http'}->body =~ /\A[\ \t\n]*([0-9]{1,3}(?:\.[0-9]+)?)\%[\ \t\n]*\z/) |
148
|
0 |
0 |
unless $$self{'bufpos'} == length $$self{'buffer'} |
151
|
0 |
0 |
unless defined $fillpct |
152
|
0 |
0 |
if ($fillpct >= 20) |
153
|
0 |
0 |
if $fillpct < 50 |
159
|
0 |
0 |
unless ($$self{'http'}->request('http://www.random.org/cgi-bin/randbyte?nbytes=256&format=f') == 200) |
167
|
0 |
0 |
unless ($$self{'buffer'} =~ /\A[\x00-\xff]+\z/) |
189
|
0 |
0 |
unless ($self->_ensure_buffer) |
198
|
0 |
0 |
if ($$self{'bufpos'} == 0) { } |
207
|
0 |
0 |
if $length < 0 |
208
|
0 |
0 |
unless defined $_[1] |
209
|
0 |
0 |
if (not defined $offset) { } |
|
0 |
0 |
elsif ($offset < 0) { } |
|
0 |
0 |
elsif ($offset > length $_[1]) { } |
213
|
0 |
0 |
if $offset < -length($_[1]) |
223
|
0 |
0 |
unless ($self->_ensure_buffer) |
228
|
0 |
0 |
if ($length < $avail) |
241
|
0 |
0 |
$nread == 0 ? : |