| line |
true |
false |
branch |
|
47
|
5 |
5 |
ref $_[0] eq 'HASH' ? : |
|
48
|
5 |
5 |
$params ? : |
|
53
|
5 |
5 |
ref $_[0] eq 'HASH' ? : |
|
54
|
5 |
5 |
$params ? : |
|
59
|
5 |
5 |
ref $_[0] eq 'HASH' ? : |
|
60
|
5 |
5 |
$params ? : |
|
74
|
0 |
15 |
ref $_[0] eq 'HASH' ? : |
|
75
|
0 |
15 |
$params ? : |
|
89
|
10 |
20 |
ref $_[0] eq 'HASH' ? : |
|
90
|
10 |
5 |
$params ? : |
|
91
|
10 |
20 |
$params ? : |
|
92
|
10 |
20 |
$params ? : |
|
93
|
0 |
30 |
if (defined $source and not ref $source) { } |
|
95
|
0 |
0 |
unless $mock->generators->{$source} |
|
97
|
30 |
0 |
$mock->generators->{'word'} ? : |
|
107
|
5 |
0 |
int rand 100 ? : |
|
|
25 |
5 |
$size <= 32 ? : |
|
118
|
0 |
5 |
ref $_[0] eq 'HASH' ? : |
|
119
|
0 |
5 |
$params ? : |
|
127
|
0 |
10 |
ref $_[0] eq 'HASH' ? : |
|
128
|
0 |
5 |
$params ? : |
|
|
5 |
5 |
@_ ? : |
|
129
|
0 |
10 |
$params ? : |
|
130
|
5 |
5 |
if length $str < $size |
|
141
|
0 |
20 |
unless $str =~ /^
(\d{4}) - (\d{2}) - (\d{2})
(?: [T ] (\d{2}) : (\d{2}) # maybe time
(?: :(\d{2}) # maybe seconds
(?: \. \d+ )? # ignore milliseconds
)?
(?: Z | [-+ ][:\d]+ )? # ignore timezone or Z
)?
/x |
|
156
|
10 |
10 |
ref $_[0] eq 'HASH' ? : |
|
157
|
10 |
10 |
$params && $params->{'before'} ? : |
|
158
|
10 |
10 |
$params && $params->{'after'} ? : |
|
174
|
0 |
10 |
ref $_[0] eq 'HASH' ? : |
|
175
|
0 |
5 |
$params ? : |
|
188
|
0 |
0 |
unless my $mod = eval {
do {
require JSON::MaybeXS;
'JSON::MaybeXS'
}
} || eval {
do {
require JSON;
'JSON'
}
} || eval {
do {
require JSON::PP;
'JSON::PP'
}
} |
|
196
|
0 |
10 |
ref $_[0] eq 'HASH' ? : |
|
197
|
0 |
10 |
$params ? : |
|
198
|
0 |
10 |
defined $data ? : |