| line |
true |
false |
branch |
|
57
|
1 |
34 |
if ($hex =~ /[^0-9A-Fa-f]/su)
|
|
60
|
2 |
7 |
if ($l != 32 and $l != 48 and $l != 64)
|
|
74
|
2 |
11 |
if ($l != 16 and $l != 24 and $l != 32)
|
|
75
|
1 |
39 |
if (utf8::is_utf8($key))
|
|
91
|
0 |
18 |
if (scalar @_ < 1 or scalar @_ > 2)
|
|
97
|
5 |
13 |
if (scalar @_ == 1)
|
|
121
|
6 |
20 |
if (defined &Scalar::Util::reftype($input))
|
|
122
|
0 |
6 |
if (&Scalar::Util::reftype($input) eq "OBJECT")
|
|
128
|
2 |
0 |
if ($opt eq "text")
|
|
136
|
24 |
2 |
if (not exists $opts->{'text'} || $opts->{'text'}) { }
|
|
173
|
0 |
44 |
if (length $ct < 34)
|
|
178
|
17 |
27 |
if ($type eq '1') { }
|
|
|
15 |
12 |
elsif ($type eq '2') { }
|
|
|
6 |
6 |
elsif ($type eq '3') { }
|
|
|
2 |
4 |
elsif ($type eq '4') { }
|
|
200
|
0 |
40 |
if (length $ct < 32)
|
|
203
|
2 |
0 |
if ($opt eq "text")
|
|
213
|
12 |
28 |
unless (defined $frozen)
|
|
215
|
26 |
2 |
if (not exists $opts->{'text'} || $opts->{'text'}) { }
|