[tidy] ca
authorHeiko Schlittermann <hs@schlittermann.de>
Mon, 14 Sep 2009 16:18:34 +0200
changeset 1 acac1ec01fd8
parent 0 c163c53b5be4
child 2 0e4dd7478d70
child 4 fe368de5cf81
[tidy]
check-cert.pl
--- a/check-cert.pl	Mon Sep 14 16:08:35 2009 +0200
+++ b/check-cert.pl	Mon Sep 14 16:18:34 2009 +0200
@@ -32,9 +32,9 @@
 );
 
 my (
-    $opt_debug,    $opt_init,   $opt_signature,
-    $opt_version,  $opt_help,   $opt_warning, $opt_directory,
-    $opt_critical, $opt_binary, @opt_exclude
+    $opt_debug,  $opt_init,    $opt_signature, $opt_version,
+    $opt_help,   $opt_warning, $opt_directory, $opt_critical,
+    $opt_binary, @opt_exclude
 );
 my ($file, $w_time, $c_time);
 
@@ -44,7 +44,7 @@
 $opt_signature = "md5WithRSAEncryption";
 $opt_warning   = "1month";
 $opt_critical  = "1week";
-$opt_directory   = "/etc";
+$opt_directory = "/etc";
 
 sub process_file();
 sub print_help();
@@ -54,16 +54,16 @@
 
     Getopt::Long::Configure('bundling');
     GetOptions(
-        "i|init"       => \$opt_init,
-        "h|help"       => \$opt_help,
-        "V|version"    => \$opt_version,
-        "b|binary=s"   => \$opt_binary,
-		"d|directory=s" => \$opt_directory,
-        "w|warning=s"  => \$opt_warning,
-        "c|critical=s" => \$opt_critical,
-        "s|signature"  => \$opt_signature,
-        "e|exclude=s"  => \@opt_exclude,
-        "d|debug"      => \$opt_debug,
+        "i|init"        => \$opt_init,
+        "h|help"        => \$opt_help,
+        "V|version"     => \$opt_version,
+        "b|binary=s"    => \$opt_binary,
+        "d|directory=s" => \$opt_directory,
+        "w|warning=s"   => \$opt_warning,
+        "c|critical=s"  => \$opt_critical,
+        "s|signature"   => \$opt_signature,
+        "e|exclude=s"   => \@opt_exclude,
+        "d|debug"       => \$opt_debug,
     );
 
     print_revision($ME, $VERSION) and exit $ERRORS{"OK"} if $opt_version;
@@ -271,8 +271,9 @@
     print "\n";
     print "  -b, --binary <binary>\n";
     print "     Path of openssl binary (default: /usr/bin/openssl)\n";
-	print "  -d, --directory <path>\n";
-	print "     Absolute directory path in which will be recursively search for certificate files (default: /etc).\n";
+    print "  -d, --directory <path>\n";
+    print
+"     Absolute directory path in which will be recursively search for certificate files (default: /etc).\n";
     print "  -w, --warning <time>\n";
     print
 "     Certificat should not be more than this time older (default: 1month).\n";