]>
Raphaël G. Git Repositories - acme/blob - letscert
3 # This program is free software: you can redistribute it and/or modify
4 # it under the terms of the GNU General Public License as published by
5 # the Free Software Foundation, either version 3 of the License, or
6 # (at your option) any later version.
8 # This program is distributed in the hope that it will be useful,
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 # GNU General Public License for more details.
13 # You should have received a copy of the GNU General Public License
14 # along with this program. If not, see <http://www.gnu.org/licenses/>.
16 # Copyright (C) 2016 - 2017 Raphaël Gertz <acmepl@rapsys.eu>
26 use POSIX
qw(EXIT_SUCCESS EXIT_FAILURE);
34 # Strip and enable debug
35 @ARGV = map { if ($_ eq '-d') { $debug = 1; (); } else { $_; } } @ARGV;
37 # Strip and enable prod
38 @ARGV = map { if ($_ eq '-p') { $prod = 1; (); } else { $_; } } @ARGV;
41 if (scalar(@ARGV) < 2) {
42 print "Usage: $0 user\@example.com www.example.com [example.com] [...]\n";
47 my $acme = acme-
>new(shift @ARGV, $debug, $prod, @ARGV);
49 # Prepare environement
52 # Generate required keys