view release on metacpan or  search on metacpan

acmeman  view on Meta::CPAN

Declares IP address (or addresses) of this server. Use this keyword if
the server IP cannot be reliably determined by resolving its hostname.
Special I<IP> B<$hostip> stands for the IP retrieved by resolving the
hostname.

=back

=head2 B<[account]>

Configures where to store ACME account credentials: account key ID and
account private key.  Both values are stored in separate files on disk.
If the files do not exist B<acmeman> will initiate creation of a new
account and will save its credentials for further use.

=over 4

=item B<directory=>I<DIR>

Directory where to store credential files.  Defaults to
F</etc/ssl/acme>.

=item B<id=>I<FILE>

lib/App/Acmeman.pm  view on Meta::CPAN

	    key => $self->account_key->get_private_key_string(),
	    key_id => $self->account_key_id
        );
	$self->{_acme} = $acme;

	unless ($acme->key_id()) {
	    # Create new account
	    debug(3, "creating account");
	    my $terms_url = $acme->get_terms_of_service();
	    $acme->create_account(termsOfServiceAgreed => 1);
	    debug(3, "saving account credentials");
	    $self->account_key_id($acme->key_id());
	    my $keyfile = $self->cf->get('account', 'key');
	    if (open(my $fh, '>', $keyfile)) {
	        print $fh $self->account_key->get_private_key_string();
	        close $fh;
	    } else {
		error("can't open $keyfile for writing: $!");
	    }
	}
    }