| line |
!l |
l&&!r |
l&&r |
condition |
|
908
|
0 |
0 |
0 |
"" ne $user and "" ne $pass |
|
1202
|
100 |
0 |
0 |
defined $datum->{'SPADOC_CD'} and $datum->{'SPADOC_CD'} eq "ALL" |
|
1537
|
1 |
1 |
0 |
$opt->{'rms'} and $opt->{'match'} |
|
1625
|
3 |
0 |
0 |
$format eq "JSON" and $self->getv("pretty") |
|
1998
|
0 |
0 |
1 |
@args and defined $args[0] |
|
2588
|
0 |
0 |
0 |
$rslt{$body->[0]} and $body->[4] != 3 |
|
2782
|
0 |
0 |
0 |
$rslt->{$oid} and not $body->{'DECAY'} |
|
2930
|
0 |
0 |
2 |
$self->{'username'} and $self->{'password'} |
|
3357
|
35 |
0 |
0 |
$opt->{'status'} and $opt->{'status'} ne "onorbit" |
|
3519
|
5 |
0 |
0 |
wantarray and $data |
|
4199
|
1 |
0 |
0 |
$self->{'banner'} and not $self->{'filter'} |
|
4281
|
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 |
|
4305
|
1 |
0 |
0 |
$verb eq "get" and @cmdarg == 0 |
|
4346
|
1 |
0 |
0 |
$interactive and not $self->{'filter'} |
|
4510
|
0 |
1 |
4 |
defined $catalog and my $info = $catalogs{'spacetrack'}[2]{$catalog} |
|
4708
|
46 |
0 |
0 |
$self->{'pretty'} and _find_rest_arg_value(\@args, "format", "json") eq "json" |
|
4723
|
0 |
1 |
0 |
"query" eq $kind and $tle_class{$class} |
|
4989
|
0 |
0 |
51 |
defined $content and $content ne "" |
|
4994
|
30 |
20 |
1 |
$context->{'opt'}{'file'} and $data |
|
5008
|
0 |
0 |
0 |
defined $datum->{'FILE'} and $datum->{'FILE'} > $context->{'file'} |
|
5169
|
0 |
0 |
2 |
$version == 2 and not defined $expires |
|
5201
|
0 |
1 |
45 |
defined $interface_info->{'cookie_expires'} && $interface_info->{'cookie_expires'} > time |
|
5373
|
0 |
0 |
0 |
$self->{'dump_headers'} & 32 and 61 < length $content |
|
5619
|
0 |
0 |
3 |
defined $arg{'catalog'} and $catalogs{$method} |
|
|
0 |
1 |
2 |
defined $arg{'catalog'} and $catalogs{$method} and $info = $catalogs{$method}{$arg{'catalog'}} |
|
5690
|
0 |
0 |
6 |
$resp->is_success and defined $arg{'post_process'} |
|
5919
|
14 |
0 |
0 |
$value and my $identity = __spacetrack_identity() |
|
6038
|
0 |
0 |
2 |
$value =~ / \A \d+ \z /msx and $self->{'_space_track_interface'}[$value] |
|
6325
|
89 |
1 |
1 |
$opt->{'json'} and defined $opt->{'format'} |
|
|
90 |
1 |
0 |
$opt->{'json'} and defined $opt->{'format'} and $opt->{'format'} ne "json" |
|
6465
|
0 |
38 |
12 |
$opt->{'exclude'} and @{$opt->{'exclude'};} |
|
6474
|
0 |
49 |
1 |
$opt->{'include'} and @{$opt->{'include'};} |
|
6611
|
0 |
0 |
0 |
$text =~ / \A - /msx and my $code = $app->can("_${cmd}_opts") |
|
6649
|
0 |
0 |
0 |
defined $text and $text ne "" |
|
6680
|
0 |
0 |
0 |
1 == @rslt and $rslt[0] =~ / \W \z /msx |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
1070
|
0 |
1 |
0 |
$perl_version ||= do {
$] >= "5.01" ? $^V : do {
require Config;
'v' . $Config::Config{'version'}
}
} |
|
1218
|
0 |
0 |
0 |
$data ||= $self->_get_json_object->decode($resp->content) |
|
1542
|
1 |
0 |
1 |
$opt->{'rms'} or $opt->{'match'} |
|
1558
|
3 |
1 |
0 |
not $opt->{$key} or $info->{$key} |
|
2119
|
0 |
1 |
0 |
$self->can("_get_attr_$name") || $self->can('getv') |
|
2573
|
0 |
0 |
0 |
not $opt->{'raw'} or $ignore_raw{$fmt} |
|
2727
|
0 |
0 |
0 |
$sladen_interpret_detail{$detail} || $sladen_interpret_detail{''} |
|
3288
|
21 |
11 |
0 |
$resp->is_success or $resp->code == 418 |
|
3342
|
4 |
0 |
31 |
$opt->{'start_epoch'} or $opt->{'end_epoch'} |
|
3451
|
45 |
5 |
0 |
$opt->{'tle'} or "legacy" eq $opt->{'format'} |
|
3551
|
0 |
0 |
50 |
$args{'class'} ne "satcat" or exists $args{'CURRENT'} |
|
4184
|
0 |
1 |
0 |
$alias{$verb} || $verb |
|
4215
|
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;
}
|
|
4268
|
1 |
0 |
1 |
$verb eq "exit" or $verb eq "bye" |
|
4332
|
1 |
0 |
0 |
$self->content_type or not $self->{'filter'} |
|
4353
|
0 |
1 |
0 |
$rdln ||= "Term::ReadLine"->new("SpaceTrack orbital element access") |
|
4360
|
0 |
0 |
0 |
$readline_word_break_re ||= qr/
[\Q$readline::rl_completer_word_break_characters\E]+
/msx |
|
4972
|
6 |
74 |
0 |
$format_map{$format} || $format |
|
4979
|
61 |
19 |
0 |
__PACKAGE__->can("_accumulate_${name}_return") || sub {
my(undef, $context) = @_;
return $context->{'data'};
}
|
|
5076
|
1 |
30 |
0 |
$context->{'json'} ||= $self->_get_json_object("pretty", $context->{'opt'}{'pretty'}) |
|
5102
|
30 |
0 |
0 |
$context->{'json'} ||= $self->_get_json_object("pretty", $context->{'opt'}{'pretty'}) |
|
5893
|
0 |
0 |
0 |
$id_file_name{$^O} || sub {
return join('/', $ENV{'HOME'}, '.spacetrack-identity');
}
|
|
6084
|
2 |
1 |
0 |
$no_such_name{$source} || $source |
|
6292
|
17 |
65 |
0 |
$opt->{'sort'} ||= _validate_sort($opt->{'sort'}) |
|
6406
|
2 |
1 |
0 |
$opt->{'start_epoch'} ||= $opt->{'end_epoch'} - 86400 |
|
6407
|
1 |
2 |
0 |
$opt->{'end_epoch'} ||= $opt->{'start_epoch'} + 86400 |
|
6624
|
0 |
0 |
0 |
-S _ or -p _ |
|
6663
|
0 |
0 |
0 |
ref $app || $app |