RSS Git Download  Clone
Raw Blame History
package Local::CryptLEComplete;

# used by ~/ssl/renew-ssl-certificates.sh to handle le.pl & Crypt::LE "--complete-with" function

use Data::Printer;
use feature 'say';

our $VERSION = 0.01;

sub new { return bless {}, shift }

sub complete { }
=begin # example
sub complete {
    my $self = shift;
    my ($data, $params) = @_; # p $data; p $params;
    # You can use external logger if it has been provided.
    if ($data->{logger}) {
        # NB: The list of domains the certificate is issued for is in $data->{domains} (array ref).
        $data->{logger}->info("Handling process completion for "
        . join(', ', @{$data->{domains}}) . " with " .  __PACKAGE__);
    }
    say "Domain Certificate '$data->{certificate_file}': $data->{certificate}";
    say "Issuer's Certificate: $data->{issuer}";
    say "Key file: '$data->{key_file}'.";
    return 1;
};
=cut

1;