| line |
true |
false |
branch |
|
77
|
0 |
0 |
ref $_ ? : |
|
80
|
0 |
0 |
unless ($links{$root}) |
|
83
|
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' |
|
103
|
0 |
0 |
if (exists $element->{$type}{'links'}{'self'} and exists $element->{$type}{'meta'}) |
|
141
|
0 |
0 |
$link->{$_} ne $this_link->{$_} ? : |
|
|
0 |
0 |
unless not exists $link->{$_} && exists $this_link->{$_} |
|
146
|
0 |
0 |
unless @path |
|
148
|
0 |
0 |
unless @matches |
|
149
|
0 |
0 |
unless scalar @matches == 1 |
|
159
|
0 |
0 |
ref $_[0] && ref $_[0] ne 'HASH' ? : |
|
167
|
0 |
0 |
$_->{'link'}->rel($root)->authority ? : |
|
191
|
0 |
0 |
if @links |
|
247
|
0 |
0 |
unless defined $self->{'login'} |
|
273
|
0 |
0 |
unless my $old_passwd = shift() |
|
274
|
0 |
0 |
unless my $new_passwd = shift() |
|
276
|
0 |
0 |
unless defined $self->{'login'} |
|
301
|
0 |
0 |
unless $self->{'login'} |
|
319
|
0 |
0 |
unless my $uri = $self->get_uri('URI'->new($project), {'category', 'self', 'type', 'project'}) |
|
338
|
0 |
0 |
unless my $title = shift() |
|
355
|
0 |
0 |
$template ? : |
|
374
|
0 |
0 |
if $_[0] and exists $_[0]{'project'} and exists $_[0]{'project'}{'content'} and exists $_[0]{'project'}{'content'}{'state'} |
|
376
|
0 |
0 |
unless my $exported = $self->poll(sub {
$self->{'agent'}->get($project_uri);
}
, sub {
not +($state = $_[0]{'project'}{'content'}{'state'}) =~ /^(PREPARING|PREPARED|LOADING)$/ if $_[0] and exists $_[0]{'project'} and exists $_[0]{'project'}{'content'} and exists $_[0]{'project'}{'content'}{'state'};
}
) |
|
377
|
0 |
0 |
unless $state eq 'ENABLED' |
|
574
|
0 |
0 |
unless $self->{'login'} |
|
618
|
0 |
0 |
if ref $result eq 'HASH' |
|
623
|
0 |
0 |
if $_[0] and exists $_[0]{'raw'} |
|
624
|
0 |
0 |
unless my $exported = $self->poll(sub {
$self->{'agent'}->get($result);
}
, sub {
$_[0]{'raw'} ne 'null' if $_[0] and exists $_[0]{'raw'};
}
) |
|
627
|
0 |
0 |
if exists $exported->{'uri'} |
|
634
|
0 |
0 |
if $exported->{'type'} eq {'png', 'image/png', 'pdf', 'application/pdf', 'xls', 'application/vnd.ms-excel'}->{$format} |
|
653
|
0 |
0 |
unless $model->{'type'} eq 'image/png' |
|
693
|
0 |
0 |
unless $upload_info->{'dataSetSLIManifest'} |
|
727
|
0 |
0 |
unless my $result = $self->poll(sub {
$self->{'agent'}->get($task);
}
, sub {
not +(shift())->{'taskStatus'} =~ /^(RUNNING|PREPARED)$/;
}
) |
|
729
|
0 |
0 |
if $result->{'taskStatus'} eq 'OK' |
|
730
|
0 |
0 |
if $result->{'taskStatus'} eq 'WARNING' |
|
754
|
0 |
0 |
if &$cond($ret) |
|
772
|
0 |
0 |
unless my $type = shift() |
|
773
|
0 |
0 |
unless my $title = shift() |
|
775
|
0 |
0 |
unless my $expression = shift() |
|
777
|
0 |
0 |
if (defined $uri) { } |
|
808
|
0 |
0 |
unless my $title = shift() |
|
814
|
0 |
0 |
if (defined $uri) { } |
|
855
|
0 |
0 |
if $self->{'login'} |
|
861
|
0 |
0 |
unless open my $fh, '<', $file |