line |
true |
false |
branch |
96
|
0 |
1 |
unless defined $data |
101
|
0 |
1 |
if my $is_digest = $is_blessed |
103
|
0 |
1 |
$is_digest ? : |
105
|
0 |
1 |
if ($algo) { } |
110
|
0 |
0 |
if $@ |
113
|
0 |
1 |
if $is_digest |
120
|
0 |
1 |
if (ref $self) { } |
124
|
0 |
0 |
if $algo ne $a |
132
|
1 |
0 |
if (ref $data) { } |
133
|
1 |
0 |
unless ($is_digest) |
141
|
1 |
0 |
if (my $func = $handler{&Scalar::Util::reftype($data)}) { } |
159
|
0 |
1 |
if $query |
206
|
0 |
1 |
unless defined $digest |
209
|
1 |
0 |
$algo ? : |
210
|
0 |
1 |
ref $self ? : |
214
|
0 |
1 |
if (ref $digest) { } |
215
|
0 |
0 |
unless &Scalar::Util::blessed($digest) and $digest->isa('Digest::base') |
224
|
1 |
0 |
if (defined $kind) { } |
225
|
0 |
1 |
unless $op = $OP{$kind} || $OP{$KINDS{$kind}} |
229
|
0 |
0 |
$digest =~ /[^0-9A-Fa-f]/ ? : |
|
0 |
0 |
$digest =~ /[\x80-\xff]/ ? : |
245
|
0 |
1 |
if $query |
260
|
0 |
2 |
if not defined $o or $o =~ m[^/+$] |
279
|
0 |
4 |
if not defined $hash or $hash =~ m[^/+$] |
281
|
0 |
4 |
unless defined $hash |
282
|
4 |
0 |
unless $raw |
341
|
0 |
0 |
wantarray ? : |