| line |
true |
false |
branch |
|
24
|
0 |
0 |
if $element eq $string |
|
32
|
0 |
0 |
unless ref $struct eq 'HASH' |
|
39
|
0 |
0 |
unless _is_in_arrayref($key, \@struct_possible_keys) |
|
49
|
0 |
0 |
unless $$struct{'title'} |
|
50
|
0 |
0 |
unless $$struct{'description'} |
|
58
|
0 |
0 |
if (defined $$struct{'categories'}) { } |
|
61
|
0 |
0 |
unless _is_in_arrayref($category, $self->categories) |
|
74
|
0 |
0 |
if (defined $$struct{'dateCreated'}) |
|
106
|
0 |
0 |
if (_call_has_fault($call)) |
|
111
|
0 |
0 |
if (my $result = $call->result) |
|
116
|
0 |
0 |
unless defined $result |
|
123
|
0 |
0 |
unless my $err = $call->fault |
|
137
|
0 |
0 |
unless open FILE, $abs_path |
|
151
|
0 |
0 |
unless defined $_abs_path |
|
153
|
0 |
0 |
unless my $abs_path = Cwd::abs_path($_abs_path) |
|
154
|
0 |
0 |
unless -f $abs_path |
|
156
|
0 |
0 |
unless $abs_path =~ m[([^/]+)$] |
|
161
|
0 |
0 |
unless my $type = $ft->mime_type($abs_path) |
|
181
|
0 |
0 |
if (_call_has_fault($call)) |
|
185
|
0 |
0 |
unless my $result = $call->result |
|
187
|
0 |
0 |
unless my $url = $$result{'url'} |