diff --git a/bin/verilator b/bin/verilator
index a52a1b64d..941435e1b 100755
--- a/bin/verilator
+++ b/bin/verilator
@@ -115,7 +115,7 @@ if ($opt_gdb) {
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
 }
 
 sub debug {
diff --git a/bin/verilator_coverage b/bin/verilator_coverage
index b71b4605c..2ac9b421f 100755
--- a/bin/verilator_coverage
+++ b/bin/verilator_coverage
@@ -66,7 +66,7 @@ run(verilator_coverage_bin()
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
 }
 
 sub debug {
diff --git a/bin/verilator_difftree b/bin/verilator_difftree
index b3f00f62c..5543ace6e 100755
--- a/bin/verilator_difftree
+++ b/bin/verilator_difftree
@@ -168,8 +168,8 @@ sub filter {
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub debug {
diff --git a/bin/verilator_gantt b/bin/verilator_gantt
index 32b1cef3f..06250b017 100755
--- a/bin/verilator_gantt
+++ b/bin/verilator_gantt
@@ -43,8 +43,8 @@ exit(0);
 #######################################################################
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub parameter {
diff --git a/bin/verilator_profcfunc b/bin/verilator_profcfunc
index b1a2e9cfa..23b4b5bc7 100755
--- a/bin/verilator_profcfunc
+++ b/bin/verilator_profcfunc
@@ -39,8 +39,8 @@ profcfunc($Opt_File);
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub debug {
diff --git a/nodist/dot_importer b/nodist/dot_importer
index d02d3823b..4da1cae7b 100755
--- a/nodist/dot_importer
+++ b/nodist/dot_importer
@@ -38,8 +38,8 @@ cwrite("graph_export.cpp");
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub debug {
diff --git a/nodist/dot_pruner b/nodist/dot_pruner
index d3323a31f..a3dca4d7b 100755
--- a/nodist/dot_pruner
+++ b/nodist/dot_pruner
@@ -43,8 +43,8 @@ dotwrite();
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub debug {
diff --git a/nodist/git_untabify b/nodist/git_untabify
index 619638bc9..c58922bbe 100755
--- a/nodist/git_untabify
+++ b/nodist/git_untabify
@@ -22,7 +22,8 @@ Getopt::Long::config("no_auto_abbrev");
 if (! GetOptions (
           "debug"       => sub { $Debug = 1; },
           "help"        => sub { print "Version $VERSION\n";
-                                 pod2usage(-verbose=>2, -exitval => 2, output=>\*STDOUT, -noperldoc=>1); },
+                                 pod2usage(-verbose=>2, -exitval => 0,
+                                           output=>\*STDOUT, -noperldoc=>1); },
           "narrow!"     => sub { $Opt_Widen = 0; },
           "version"     => sub { print "Version $VERSION\n"; exit(0); },
           "widen!"      => sub { $Opt_Widen = 1; },  # Default, undocumented
diff --git a/nodist/vtree_importer b/nodist/vtree_importer
index 8d1225a0b..f3d3ec336 100755
--- a/nodist/vtree_importer
+++ b/nodist/vtree_importer
@@ -40,8 +40,8 @@ print '(query-replace-regexp "(\\([0-9a-z_]+\\))" "\\1" nil nil nil)',"\n";
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub debug {
diff --git a/src/astgen b/src/astgen
index 86a9e6f92..51bfb8f6a 100644
--- a/src/astgen
+++ b/src/astgen
@@ -50,8 +50,8 @@ foreach my $cpt (@Opt_Cpt) {
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub parameter {
diff --git a/src/bisonpre b/src/bisonpre
index 8c768ba8e..f1b88c92d 100755
--- a/src/bisonpre
+++ b/src/bisonpre
@@ -56,8 +56,8 @@ process();
 
 sub usage {
     print "Version $VERSION\n";
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT, -noperldoc=>1);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT, -noperldoc=>1);
+    exit(1);  # Unreachable
 }
 
 sub parameter {
diff --git a/src/cppcheck_filtered b/src/cppcheck_filtered
index f562d19bf..1f50c5c92 100755
--- a/src/cppcheck_filtered
+++ b/src/cppcheck_filtered
@@ -39,8 +39,8 @@ process();
 
 sub usage {
     print "Version $VERSION\n";
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT, -noperldoc=>1);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT, -noperldoc=>1);
+    exit(1);  # Unreachable
 }
 
 #######################################################################
diff --git a/src/vlcovgen b/src/vlcovgen
index d665ce9e2..7c19810b3 100755
--- a/src/vlcovgen
+++ b/src/vlcovgen
@@ -33,8 +33,8 @@ write_keys("$Opt_Srcdir/../include/verilated_cov_key.h");
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 #######################################################################
diff --git a/test_regress/driver.pl b/test_regress/driver.pl
index 56c7c0680..38f102746 100755
--- a/test_regress/driver.pl
+++ b/test_regress/driver.pl
@@ -201,8 +201,8 @@ exit(10) if $runner->fail_count;
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub debug {
diff --git a/test_regress/t/t_flag_help.pl b/test_regress/t/t_flag_help.pl
index 8b87d243d..c412c69c9 100755
--- a/test_regress/t/t_flag_help.pl
+++ b/test_regress/t/t_flag_help.pl
@@ -17,7 +17,7 @@ foreach my $prog (
     "../bin/verilator_gantt",
     "../bin/verilator_profcfunc",
     ) {
-    run(fails => 1,
+    run(fails => 0,
         cmd => ["perl", $prog,
                 "--help"],
         logfile => "$Self->{obj_dir}/t_help.log",
diff --git a/test_regress/vgen.pl b/test_regress/vgen.pl
index 4b7b2299e..3ed4afac2 100755
--- a/test_regress/vgen.pl
+++ b/test_regress/vgen.pl
@@ -237,8 +237,8 @@ write_output_v($Opt_Output);
 #----------------------------------------------------------------------
 
 sub usage {
-    pod2usage(-verbose=>2, -exitval=>2, -output=>\*STDOUT);
-    exit(1);
+    pod2usage(-verbose=>2, -exitval=>0, -output=>\*STDOUT);
+    exit(1);  # Unreachable
 }
 
 sub debug {