line |
true |
false |
branch |
78
|
0 |
0 |
ref $_ ? : |
81
|
0 |
0 |
unless ($links{$root}) |
84
|
0 |
0 |
if (exists $$response{'about'}) { } |
|
0 |
0 |
elsif (exists $$response{'query'} and exists $$response{'query'}{'entries'}) { } |
|
0 |
0 |
elsif (scalar keys %$response == 1) { } |
95
|
0 |
0 |
if ref $$response{$structure} eq 'ARRAY' |
104
|
0 |
0 |
if (exists $$element{$type}{'links'}{'self'} and exists $$element{$type}{'meta'}) |
140
|
0 |
0 |
$$link{$_} ne $$this_link{$_} ? : |
|
0 |
0 |
unless not exists $$link{$_} && exists $$this_link{$_} |
147
|
0 |
0 |
unless @path |
149
|
0 |
0 |
unless @matches |
150
|
0 |
0 |
unless scalar @matches == 1 |
160
|
0 |
0 |
ref $_[0] && ref $_[0] ne 'HASH' ? : |
168
|
0 |
0 |
$$_{'link'}->rel($root)->authority ? : |
192
|
0 |
0 |
if @links |
248
|
0 |
0 |
unless defined $$self{'login'} |
274
|
0 |
0 |
unless my $old_passwd = shift() |
275
|
0 |
0 |
unless my $new_passwd = shift() |
277
|
0 |
0 |
unless defined $$self{'login'} |
302
|
0 |
0 |
unless $$self{'login'} |
320
|
0 |
0 |
unless my $uri = $self->get_uri('URI'->new($project), {'category', 'self', 'type', 'project'}) |
342
|
0 |
0 |
unless my $title = shift() |
352
|
0 |
0 |
$driver ? : |
|
0 |
0 |
$token ? : |
|
0 |
0 |
$template ? : |
390
|
0 |
0 |
$sso_provider ? : |
431
|
0 |
0 |
unless $$self{'login'} |
475
|
0 |
0 |
if ref $result eq 'HASH' |
480
|
0 |
0 |
if $_[0] and exists $_[0]{'raw'} |
481
|
0 |
0 |
unless my $exported = $self->poll(sub {
$$self{'agent'}->get($result);
}
, sub {
$_[0]{'raw'} ne 'null' if $_[0] and exists $_[0]{'raw'};
}
) |
484
|
0 |
0 |
if exists $$exported{'uri'} |
494
|
0 |
0 |
if exists $compat{$wanted} |
495
|
0 |
0 |
if $$exported{'type'} =~ /^$wanted/ |
514
|
0 |
0 |
unless $$model{'type'} eq 'image/png' |
553
|
0 |
0 |
unless $$upload_info{'dataSetSLIManifest'} |
588
|
0 |
0 |
unless my $result = $self->poll(sub {
$$self{'agent'}->get($task);
}
, sub {
not +(shift())->{'taskStatus'} =~ /^(RUNNING|PREPARED)$/;
}
) |
590
|
0 |
0 |
if $$result{'taskStatus'} eq 'OK' |
591
|
0 |
0 |
if $$result{'taskStatus'} eq 'WARNING' |
615
|
0 |
0 |
if &$cond($ret) |
633
|
0 |
0 |
unless my $type = shift() |
634
|
0 |
0 |
unless my $title = shift() |
636
|
0 |
0 |
unless my $expression = shift() |
638
|
0 |
0 |
if (defined $uri) { } |
669
|
0 |
0 |
unless my $title = shift() |
675
|
0 |
0 |
if (defined $uri) { } |
716
|
0 |
0 |
if $$self{'login'} |
722
|
0 |
0 |
unless open my $fh, '<', $file |