| line |
!l |
l&&!r |
l&&r |
condition |
|
902
|
0 |
0 |
0 |
"" ne $user and "" ne $pass |
|
1196
|
100 |
0 |
0 |
defined $datum->{'SPADOC_CD'} and $datum->{'SPADOC_CD'} eq "ALL" |
|
1531
|
1 |
1 |
0 |
$opt->{'rms'} and $opt->{'match'} |
|
1619
|
3 |
0 |
0 |
$format eq "JSON" and $self->getv("pretty") |
|
1992
|
0 |
0 |
1 |
@args and defined $args[0] |
|
2582
|
0 |
0 |
0 |
$rslt{$body->[0]} and $body->[4] != 3 |
|
2776
|
0 |
0 |
0 |
$rslt->{$oid} and not $body->{'DECAY'} |
|
2924
|
0 |
0 |
2 |
$self->{'username'} and $self->{'password'} |
|
3351
|
35 |
0 |
0 |
$opt->{'status'} and $opt->{'status'} ne "onorbit" |
|
3513
|
5 |
0 |
0 |
wantarray and $data |
|
4193
|
1 |
0 |
0 |
$self->{'banner'} and not $self->{'filter'} |
|
4275
|
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 |
|
4299
|
1 |
0 |
0 |
$verb eq "get" and @cmdarg == 0 |
|
4340
|
1 |
0 |
0 |
$interactive and not $self->{'filter'} |
|
4504
|
0 |
1 |
4 |
defined $catalog and my $info = $catalogs{'spacetrack'}[2]{$catalog} |
|
4702
|
46 |
0 |
0 |
$self->{'pretty'} and _find_rest_arg_value(\@args, "format", "json") eq "json" |
|
4717
|
0 |
1 |
0 |
"query" eq $kind and $tle_class{$class} |
|
4983
|
0 |
0 |
51 |
defined $content and $content ne "" |
|
4988
|
30 |
20 |
1 |
$context->{'opt'}{'file'} and $data |
|
5002
|
0 |
0 |
0 |
defined $datum->{'FILE'} and $datum->{'FILE'} > $context->{'file'} |
|
5163
|
0 |
0 |
2 |
$version == 2 and not defined $expires |
|
5195
|
0 |
1 |
45 |
defined $interface_info->{'cookie_expires'} && $interface_info->{'cookie_expires'} > time |
|
5367
|
0 |
0 |
0 |
$self->{'dump_headers'} & 32 and 61 < length $content |
|
5613
|
0 |
0 |
3 |
defined $arg{'catalog'} and $catalogs{$method} |
|
|
0 |
1 |
2 |
defined $arg{'catalog'} and $catalogs{$method} and $info = $catalogs{$method}{$arg{'catalog'}} |
|
5684
|
0 |
0 |
6 |
$resp->is_success and defined $arg{'post_process'} |
|
5913
|
14 |
0 |
0 |
$value and my $identity = __spacetrack_identity() |
|
6032
|
0 |
0 |
2 |
$value =~ / \A \d+ \z /msx and $self->{'_space_track_interface'}[$value] |
|
6319
|
89 |
1 |
1 |
$opt->{'json'} and defined $opt->{'format'} |
|
|
90 |
1 |
0 |
$opt->{'json'} and defined $opt->{'format'} and $opt->{'format'} ne "json" |
|
6459
|
0 |
38 |
12 |
$opt->{'exclude'} and @{$opt->{'exclude'};} |
|
6468
|
0 |
49 |
1 |
$opt->{'include'} and @{$opt->{'include'};} |
|
6605
|
0 |
0 |
0 |
$text =~ / \A - /msx and my $code = $app->can("_${cmd}_opts") |
|
6643
|
0 |
0 |
0 |
defined $text and $text ne "" |
|
6674
|
0 |
0 |
0 |
1 == @rslt and $rslt[0] =~ / \W \z /msx |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
1064
|
0 |
1 |
0 |
$perl_version ||= do {
$] >= "5.01" ? $^V : do {
require Config;
'v' . $Config::Config{'version'}
}
} |
|
1212
|
0 |
0 |
0 |
$data ||= $self->_get_json_object->decode($resp->content) |
|
1536
|
1 |
0 |
1 |
$opt->{'rms'} or $opt->{'match'} |
|
1552
|
3 |
1 |
0 |
not $opt->{$key} or $info->{$key} |
|
2113
|
0 |
1 |
0 |
$self->can("_get_attr_$name") || $self->can('getv') |
|
2567
|
0 |
0 |
0 |
not $opt->{'raw'} or $ignore_raw{$fmt} |
|
2721
|
0 |
0 |
0 |
$sladen_interpret_detail{$detail} || $sladen_interpret_detail{''} |
|
3282
|
21 |
11 |
0 |
$resp->is_success or $resp->code == 418 |
|
3336
|
4 |
0 |
31 |
$opt->{'start_epoch'} or $opt->{'end_epoch'} |
|
3445
|
45 |
5 |
0 |
$opt->{'tle'} or "legacy" eq $opt->{'format'} |
|
3545
|
0 |
0 |
50 |
$args{'class'} ne "satcat" or exists $args{'CURRENT'} |
|
4178
|
0 |
1 |
0 |
$alias{$verb} || $verb |
|
4209
|
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;
}
|
|
4262
|
1 |
0 |
1 |
$verb eq "exit" or $verb eq "bye" |
|
4326
|
1 |
0 |
0 |
$self->content_type or not $self->{'filter'} |
|
4347
|
0 |
1 |
0 |
$rdln ||= "Term::ReadLine"->new("SpaceTrack orbital element access") |
|
4354
|
0 |
0 |
0 |
$readline_word_break_re ||= qr/
[\Q$readline::rl_completer_word_break_characters\E]+
/msx |
|
4966
|
6 |
74 |
0 |
$format_map{$format} || $format |
|
4973
|
61 |
19 |
0 |
__PACKAGE__->can("_accumulate_${name}_return") || sub {
my(undef, $context) = @_;
return $context->{'data'};
}
|
|
5070
|
1 |
30 |
0 |
$context->{'json'} ||= $self->_get_json_object("pretty", $context->{'opt'}{'pretty'}) |
|
5096
|
30 |
0 |
0 |
$context->{'json'} ||= $self->_get_json_object("pretty", $context->{'opt'}{'pretty'}) |
|
5887
|
0 |
0 |
0 |
$id_file_name{$^O} || sub {
return join('/', $ENV{'HOME'}, '.spacetrack-identity');
}
|
|
6078
|
2 |
1 |
0 |
$no_such_name{$source} || $source |
|
6286
|
17 |
65 |
0 |
$opt->{'sort'} ||= _validate_sort($opt->{'sort'}) |
|
6400
|
2 |
1 |
0 |
$opt->{'start_epoch'} ||= $opt->{'end_epoch'} - 86400 |
|
6401
|
1 |
2 |
0 |
$opt->{'end_epoch'} ||= $opt->{'start_epoch'} + 86400 |
|
6618
|
0 |
0 |
0 |
-S _ or -p _ |
|
6657
|
0 |
0 |
0 |
ref $app || $app |