use FS::Record qw(qsearch qsearchs dbh);
use Tie::IxHash;
+use IO::Socket::SSL;
use LWP::UserAgent;
use URI;
use Cpanel::JSON::XS;
default => 'default',
},
'subscriber_profile_set' => {
- label => 'Subscriber profile set name',
+ label => 'Subscriber profile set name (optional)',
},
'reseller_id' => { label => 'Reseller ID' },
'ssl_no_verify' => { label => 'Skip SSL certificate validation',
will receive calls at this number.
</OL>
</P>
-<P>Export options:
-</P>
END
);
$self->{_ua} ||= do {
my @opt;
if ( $self->option('ssl_no_verify') ) {
- push @opt, ssl_opts => { verify_hostname => 0 };
+ push @opt, ssl_opts => {
+ verify_hostname => 0,
+ SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE,
+ };
}
my $ua = LWP::UserAgent->new(@opt);
$ua->credentials(