| line |
true |
false |
branch |
|
88
|
0 |
2 |
if ($$args{'categories'}) |
|
90
|
0 |
0 |
unless ref $$args{'categories'} eq 'ARRAY' |
|
125
|
0 |
0 |
unless ref $self eq ref $target |
|
140
|
0 |
0 |
if ref $categories{$id2} |
|
192
|
0 |
0 |
unless ref $list eq 'ARRAY' |
|
226
|
0 |
0 |
if (grep((!ref($_)), @$categories)) |
|
235
|
0 |
0 |
unless (ref($cat_id = $$categories[$_])) |
|
237
|
0 |
0 |
unless ref($$categories[$_] = $class->find({'id', $cat_id})) |
|
272
|
1 |
0 |
unless ref $args |
|
313
|
0 |
1 |
if $key eq 'api_key' |
|
319
|
0 |
1 |
if ($key eq 'id') |
|
330
|
0 |
1 |
if ($key eq 'category') |
|
333
|
0 |
0 |
ref $value && $value->isa('WebService::ISBNDB::API::Categories') ? : |
|
342
|
1 |
0 |
if ($key =~ /^(:?name|category_id|subject_id)$/) |