add get/keps command to load AMSAT keps

[spider.git] / cmd / show / satellite.pl

diff --git a/cmd/show/satellite.pl b/cmd/show/satellite.pl
index 35bc7b88ba4a80f0eff0f1ae95dd181185680307..bede7a89dfd75859adfdf386f385332251f49e32 100644 (file)
--- a/cmd/show/satellite.pl
+++ b/cmd/show/satellite.pl
@@ -16,9 +16,9 @@ my ($self, $line) = @_;
 my @out;
 
 my @f = split /\s+/, $line;
-my $satname = uc shift @f;
-my $numhours = shift @f;       # the number of hours ahead to print
-my $step = shift @f;           # tracking table resolution in minutes
+my $satname = uc shift @f if @f;
+my $numhours = shift @f if @f; # the number of hours ahead to print
+my $step = shift @f if @f;             # tracking table resolution in minutes
 
 # default hours and step size
 $numhours = 3 unless $numhours && $numhours =~ /^\d+$/;