icli: Die upon invalid options

1 files changed, 2 insertions, 1 deletions

diff --git a/bin/icli b/bin/icli
index 85c2101..4d7d2a5 100755
--- a/bin/icli
+++ b/bin/icli
@@ -357,7 +357,8 @@ GetOptions(
 	'v|verbose+'      => \$verbosity,
 	'V|version'       => sub { say "icli version $VERSION"; exit 0 },
 	'x|critical-only' => \$short,
-);
+)
+	or die("Please see perldoc -F $0 for help\n");
 
 read_objects($status_file, \$data);
 read_objects($config_file, \$config);