| line |
true |
false |
branch |
|
90
|
0 |
1 |
if scalar @_ > 0
|
|
94
|
0 |
0 |
$self->_partial_object ? :
|
|
|
0 |
1 |
if $self->api->debug
|
|
108
|
0 |
0 |
if scalar @_ > 0
|
|
109
|
0 |
1 |
if scalar @_ > 0
|
|
111
|
0 |
0 |
if scalar @_ > 0
|
|
115
|
0 |
0 |
if $path =~ /\b([0-9a-f]{8}\-[0-9a-f]{4}\-[0-9a-f]{4}\-[0-9a-f]{4}\-[0-9a-f]{12})\b/
|
|
141
|
0 |
0 |
if scalar @_ > 0
|
|
146
|
0 |
0 |
if scalar @_ > 0
|
|
148
|
0 |
0 |
if (exists $self->hash->{'link'})
|
|
165
|
0 |
0 |
if scalar @_ > 0
|
|
|
0 |
0 |
$self->href->path =~ m[/api/admin/] ? :
|
|
170
|
0 |
0 |
if scalar @_ > 0
|
|
171
|
0 |
0 |
if $self->_partial_object
|
|
176
|
0 |
0 |
if scalar @_ > 0
|
|
191
|
0 |
0 |
if keys %args
|
|
|
0 |
0 |
if scalar @_ > 6
|
|
194
|
0 |
0 |
if (not defined $rel or $rel eq ($link->rel || ''))
|
|
195
|
0 |
0 |
if (not defined $type or $type eq ($link->type || ''))
|
|
196
|
0 |
0 |
if (not defined $name or $name eq ($link->name || ''))
|
|
210
|
0 |
0 |
unless (scalar @matched_links)
|
|
233
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
scalar @_ > 1 ? :
|
|
|
0 |
0 |
if scalar @_ > 2
|
|
240
|
0 |
0 |
exists $hash->{'link'} ? :
|
|
242
|
0 |
0 |
$object->_partial_object ? :
|
|
|
0 |
0 |
if $self->api->debug
|
|
255
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
258
|
0 |
0 |
unless exists $self->hash->{$type}
|
|
265
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
unless scalar @_ > 1
|
|
|
0 |
0 |
if scalar @_ > 2
|
|
268
|
0 |
0 |
unless exists $self->hash->{$type} and XXX
|
|
269
|
0 |
0 |
unless exists $self->hash->{$type}{$subtype}
|
|
276
|
0 |
0 |
if scalar @_ > 0
|
|
278
|
0 |
0 |
unless exists $hash->{'children'} and XXX
|
|
291
|
0 |
0 |
if scalar @_ > 0
|
|
294
|
0 |
0 |
if scalar @_ > 0
|
|
295
|
0 |
0 |
if scalar @_ > 0
|
|
298
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
301
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
306
|
0 |
0 |
if scalar @_ > 1
|
|
307
|
0 |
0 |
if ($self->is_admin_object and not defined $subpath) { }
|
|
314
|
0 |
0 |
if defined $subpath
|
|
320
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
|
0 |
0 |
ref $thing eq 'ARRAY' ? :
|
|
|
0 |
0 |
!defined($thing) ? :
|