shebang fix for tls_cert (standalone script)

This commit is contained in:
Matt Simerson 2012-05-07 14:56:09 -04:00 committed by Robert
parent 319391affe
commit b53454730d

View File

@ -1,4 +1,6 @@
#!perl -w #!/usr/bin/perl
use strict;
use warnings; use warnings;
# Very basic script to create TLS certificates for qpsmtpd # Very basic script to create TLS certificates for qpsmtpd
@ -45,6 +47,7 @@ my $CA_key = 'ssl/qpsmtpd-ca.key';
my $CA_crt = 'ssl/qpsmtpd-ca.crt'; my $CA_crt = 'ssl/qpsmtpd-ca.crt';
my $CA_serial = 'ssl/.cert.serial'; my $CA_serial = 'ssl/.cert.serial';
my $template;
my ($CA, $CAfilename) = tempfile( $template, DIR => "ssl", UNLINK => 1); my ($CA, $CAfilename) = tempfile( $template, DIR => "ssl", UNLINK => 1);
print ${CA} return_cfg('CA'); print ${CA} return_cfg('CA');