Exiqgrep: check arg parsing. Bug 2821

diff --git a/src/src/exiqgrep.src b/src/src/exiqgrep.src
index c8762df479da01279db8d73d9a4a1ad3a57ecd93..04602da680c62f41eb6cd5caeb655ea383d64ef7 100644 (file)
--- a/src/src/exiqgrep.src
+++ b/src/src/exiqgrep.src
@@ -53,7 +53,7 @@ if ($ARGV[0] eq '--version') {
         exit 0;
 }
 
-getopts('hf:r:y:o:s:C:zxlibRcaG:',\%opt);
+if (!getopts('hf:r:y:o:s:C:zxlibRcaG:',\%opt) { &help; exit;}
 if ($ARGV[0]) { &help; exit;}
 if ($opt{h}) { &help; exit;}
 if ($opt{a}) { $eargs = '-bp'; }