| line |
!l |
l&&!r |
l&&r |
condition |
|
908
|
0 |
0 |
0 |
"" ne $user and "" ne $pass |
|
1200
|
100 |
0 |
0 |
defined $datum->{'SPADOC_CD'} and $datum->{'SPADOC_CD'} eq "ALL" |
|
1535
|
1 |
1 |
0 |
$opt->{'rms'} and $opt->{'match'} |
|
1623
|
4 |
0 |
0 |
$format eq "JSON" and $self->getv("pretty") |
|
1996
|
0 |
0 |
1 |
@args and defined $args[0] |
|
2586
|
0 |
0 |
0 |
$rslt{$body->[0]} and $body->[4] != 3 |
|
2780
|
0 |
0 |
0 |
$rslt->{$oid} and not $body->{'DECAY'} |
|
2928
|
0 |
0 |
2 |
$self->{'username'} and $self->{'password'} |
|
3362
|
35 |
0 |
0 |
$opt->{'status'} and $opt->{'status'} ne "onorbit" |
|
3524
|
5 |
0 |
0 |
wantarray and $data |
|
4204
|
1 |
0 |
0 |
$self->{'banner'} and not $self->{'filter'} |
|
4286
|
0 |
0 |
1 |
$verb ne "new" and $verb ne "shell" |
|
|
0 |
0 |
1 |
$verb ne "new" and $verb ne "shell" and not $verb =~ / \A _ [^_] /msx |
|
4310
|
1 |
0 |
0 |
$verb eq "get" and @cmdarg == 0 |
|
4351
|
1 |
0 |
0 |
$interactive and not $self->{'filter'} |
|
4515
|
0 |
1 |
4 |
defined $catalog and my $info = $catalogs{'spacetrack'}[2]{$catalog} |
|
4713
|
46 |
0 |
0 |
$self->{'pretty'} and _find_rest_arg_value(\@args, "format", "json") eq "json" |
|
4728
|
0 |
1 |
0 |
"query" eq $kind and $tle_class{$class} |
|
4994
|
0 |
0 |
51 |
defined $content and $content ne "" |
|
4999
|
30 |
20 |
1 |
$context->{'opt'}{'file'} and $data |
|
5013
|
0 |
0 |
0 |
defined $datum->{'FILE'} and $datum->{'FILE'} > $context->{'file'} |
|
5174
|
0 |
0 |
2 |
$version == 2 and not defined $expires |
|
5206
|
0 |
1 |
45 |
defined $interface_info->{'cookie_expires'} && $interface_info->{'cookie_expires'} > time |
|
5377
|
0 |
0 |
0 |
$self->{'dump_headers'} & 32 and 61 < length $content |
|
5623
|
0 |
0 |
3 |
defined $arg{'catalog'} and $catalogs{$method} |
|
|
0 |
1 |
2 |
defined $arg{'catalog'} and $catalogs{$method} and $info = $catalogs{$method}{$arg{'catalog'}} |
|
5694
|
0 |
0 |
7 |
$resp->is_success and defined $arg{'post_process'} |
|
5923
|
14 |
0 |
0 |
$value and my $identity = __spacetrack_identity() |
|
6042
|
0 |
0 |
2 |
$value =~ / \A \d+ \z /msx and $self->{'_space_track_interface'}[$value] |
|
6329
|
89 |
1 |
1 |
$opt->{'json'} and defined $opt->{'format'} |
|
|
90 |
1 |
0 |
$opt->{'json'} and defined $opt->{'format'} and $opt->{'format'} ne "json" |
|
6469
|
0 |
38 |
12 |
$opt->{'exclude'} and @{$opt->{'exclude'};} |
|
6478
|
0 |
49 |
1 |
$opt->{'include'} and @{$opt->{'include'};} |
|
6615
|
0 |
0 |
0 |
$text =~ / \A - /msx and my $code = $app->can("_${cmd}_opts") |
|
6653
|
0 |
0 |
0 |
defined $text and $text ne "" |
|
6684
|
0 |
0 |
0 |
1 == @rslt and $rslt[0] =~ / \W \z /msx |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
1068
|
0 |
1 |
0 |
$perl_version ||= do {
$] >= "5.01" ? $^V : do {
require Config;
'v' . $Config::Config{'version'}
}
} |
|
1216
|
0 |
0 |
0 |
$data ||= $self->_get_json_object->decode($resp->content) |
|
1540
|
1 |
0 |
1 |
$opt->{'rms'} or $opt->{'match'} |
|
1556
|
3 |
1 |
0 |
not $opt->{$key} or $info->{$key} |
|
2117
|
0 |
1 |
0 |
$self->can("_get_attr_$name") || $self->can('getv') |
|
2571
|
0 |
0 |
0 |
not $opt->{'raw'} or $ignore_raw{$fmt} |
|
2725
|
0 |
0 |
0 |
$sladen_interpret_detail{$detail} || $sladen_interpret_detail{''} |
|
3293
|
21 |
11 |
0 |
$resp->is_success or $resp->code == 418 |
|
3347
|
4 |
0 |
31 |
$opt->{'start_epoch'} or $opt->{'end_epoch'} |
|
3456
|
45 |
5 |
0 |
$opt->{'tle'} or "legacy" eq $opt->{'format'} |
|
3556
|
0 |
0 |
50 |
$args{'class'} ne "satcat" or exists $args{'CURRENT'} |
|
4189
|
0 |
1 |
0 |
$alias{$verb} || $verb |
|
4220
|
0 |
0 |
0 |
eval {
do {
$self->_get_readline($stdout)
}
} || sub {
print {$stdout;} $self->getv('prompt');
return readline STDIN;
}
|
|
|
0 |
0 |
0 |
$read ||= $interactive ? eval {
do {
$self->_get_readline($stdout)
}
} || sub {
print {$stdout;} $self->getv('prompt');
return readline STDIN;
}
: sub {
return readline STDIN;
}
|
|
4273
|
1 |
0 |
1 |
$verb eq "exit" or $verb eq "bye" |
|
4337
|
1 |
0 |
0 |
$self->content_type or not $self->{'filter'} |
|
4358
|
0 |
1 |
0 |
$rdln ||= "Term::ReadLine"->new("SpaceTrack orbital element access") |
|
4365
|
0 |
0 |
0 |
$readline_word_break_re ||= qr/
[\Q$readline::rl_completer_word_break_characters\E]+
/msx |
|
4977
|
6 |
74 |
0 |
$format_map{$format} || $format |
|
4984
|
61 |
19 |
0 |
__PACKAGE__->can("_accumulate_${name}_return") || sub {
my(undef, $context) = @_;
return $context->{'data'};
}
|
|
5081
|
1 |
30 |
0 |
$context->{'json'} ||= $self->_get_json_object("pretty", $context->{'opt'}{'pretty'}) |
|
5107
|
30 |
0 |
0 |
$context->{'json'} ||= $self->_get_json_object("pretty", $context->{'opt'}{'pretty'}) |
|
5897
|
0 |
0 |
0 |
$id_file_name{$^O} || sub {
return join('/', $ENV{'HOME'}, '.spacetrack-identity');
}
|
|
6088
|
2 |
1 |
0 |
$no_such_name{$source} || $source |
|
6296
|
17 |
65 |
0 |
$opt->{'sort'} ||= _validate_sort($opt->{'sort'}) |
|
6410
|
2 |
1 |
0 |
$opt->{'start_epoch'} ||= $opt->{'end_epoch'} - 86400 |
|
6411
|
1 |
2 |
0 |
$opt->{'end_epoch'} ||= $opt->{'start_epoch'} + 86400 |
|
6628
|
0 |
0 |
0 |
-S _ or -p _ |
|
6667
|
0 |
0 |
0 |
ref $app || $app |