X-Git-Url: https://git.zerfleddert.de/cgi-bin/gitweb.cgi/rsbs2/blobdiff_plain/a154a83fe4695eca4bb8aeebe7fb5380561a94df..583bcdfcb6b2280220f4cfeeb5bc829ecf3ccdfc:/supermicro-kvm.pl diff --git a/supermicro-kvm.pl b/supermicro-kvm.pl index afe0523..91ea8a6 100755 --- a/supermicro-kvm.pl +++ b/supermicro-kvm.pl @@ -48,11 +48,9 @@ sub read_inifile { my %Config = read_inifile("$ENV{HOME}/.rsbs2rc"); -my $hostalias; +my $hostalias = $ARGV[0]; -if (defined($ARGV[0])) { - $hostalias = $ARGV[0]; -} else { +if (!defined($hostalias) || !defined($Config{$hostalias})) { print STDERR "Usage: $0 card-alias\n\n"; print STDERR "card-alias\tone of: "; foreach my $alias (keys(%Config)) {