Bail out on bad arguments

1 files changed, 5 insertions, 2 deletions

diff --git a/sbofind b/sbofind
index 8ea7934..8eca349 100755
--- a/sbofind
+++ b/sbofind
@@ -43,7 +43,7 @@ EOF
 
 my ($help, $vers, $search_exact, $exclude_tags, $show_info, $show_readme, $show_queue);
 
-GetOptions(
+if (! GetOptions(
 	'help|h'    => \$help,
 	'version|v' => \$vers,
 	'exact|e'   => \$search_exact,
@@ -51,7 +51,10 @@ GetOptions(
 	'info|i'    => \$show_info,
 	'readme|r'  => \$show_readme,
 	'queue|q'   => \$show_queue,
-);
+)) {
+  show_usage();
+  exit 1;
+}
 
 if ($help) { show_usage(); exit 0 }
 if ($vers) { show_version(); exit 0 }