line |
true |
false |
branch |
57
|
0 |
0 |
if (&timeout_call($timeout, sub {
my $req = 'HTTP::Request'->new('GET', $dns_uri);
$req->content_type('application/json');
my $lwp = 'LWP::UserAgent'->new;
$lwp->timeout($timeout);
$res = $lwp->request($req);
}
)) |
69
|
0 |
0 |
unless ($res->is_success) |
116
|
0 |
0 |
if (defined $token->{'token'}) { } |
|
0 |
0 |
elsif ($token->{'error'} =~ /No permission/) { } |
|
0 |
0 |
elsif ($token->{'error'}) { } |
236
|
0 |
0 |
unless ($dat and ref $dat eq 'ARRAY' and scalar @$dat) |
299
|
0 |
0 |
unless ($res->is_success) |
324
|
0 |
0 |
if ($rh_course->{'shortname'} eq $args{'short_cname'}) |
414
|
0 |
0 |
if $res->content eq 'null' |