X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=make%2Fopensslcert.pm;h=3bf5b4533bda7df7657c65cf25cb7668aa12b5b4;hb=1312f2db8ed90464e73acdcc07bb1aae92964345;hp=a4954e0be5fb651b758fd75160a427f35117cf91;hpb=f2acdbc3820f0f4f5ef76a0a64e73d2a320df91f;p=user%2Fhenk%2Fcode%2Finspircd.git

diff --git a/make/opensslcert.pm b/make/opensslcert.pm
index a4954e0be..3bf5b4533 100644
--- a/make/opensslcert.pm
+++ b/make/opensslcert.pm
@@ -1,8 +1,25 @@
+#       +------------------------------------+
+#       | Inspire Internet Relay Chat Daemon |
+#       +------------------------------------+
+#
+#  InspIRCd: (C) 2002-2009 InspIRCd Development Team
+# See: http://wiki.inspircd.org/Credits
+#
+# This program is free but copyrighted software; see
+#      the file COPYING for details.
+#
+# ---------------------------------------------------
+
 package make::opensslcert;
 
+require 5.8.0;
+
+use strict;
+use warnings FATAL => qw(all);
+
 use Exporter 'import';
 use make::configure;
-@EXPORT = qw(make_openssl_cert);
+our @EXPORT = qw(make_openssl_cert);
 
 
 sub make_openssl_cert()
@@ -27,7 +44,7 @@ __END__
 close(FH);
 
 my $time = promptstring_s("Please enter the number of days that this certificate is valid for","365");
-	
+
 system("cat openssl.template | openssl req -x509 -nodes -newkey rsa:1024 -keyout key.pem -out cert.pem -days $time 2>/dev/null");
 system("openssl dhparam -out dhparams.pem 1024");
 unlink("openssl.template");