bin/slubsipbuilderbagit.pl

@@ -106,16 +106,16 @@ GetOptions(
     "man"                        => \$man,                                    # optional
     "print_sip_version"          => sub {
         say "supported sip version is " . SLUB::LZA::SIPBuilderBagIt::get_sip_version();
-        exit 1;
+        exit 0;
     },                                                                        # optional
     "version"                    => sub {
         say "version is " . $SLUB::LZA::SIPBuilderBagIt::VERSION;
-        exit 1;
+        exit 0;
     }
 ) or pod2usage(2);
 
 # help
-if ($help) { pod2usage(1); exit 1; }
+if ($help) { pod2usage(1); exit 0; }
 # man
 if ($man) { pod2usage(-exitval => 0, -verbose => 2); }
 # save