Net::WholesaleSystem - VentraIP Wholesale SSL API
version 0.01
use Net::WholesaleSystem; my $WholesaleSystem = Net::WholesaleSystem->new( resellerID => $resellerID, apiKey => $apiKey ); # get balance my $balance = $WholesaleSystem->balanceQuery or die $WholesaleSystem->errstr; print $balance;
VentraIP Wholesale SSL API
my $WholesaleSystem = Net::WholesaleSystem->new( resellerID => $resellerID, apiKey => $apiKey );
resellerID (required)
resellerID
apiKey (required)
apiKey
resellerID & apiKey, provided by VentraIP Wholesale
is_ote
if is_ote is set to 1, we use https://api-ote.wholesalesystem.com.au/?wsdl instead of https://api.wholesalesystem.com.au/?wsdl
debug
enable SOAP::Trace->import('all')
my $balance = $WholesaleSystem->balanceQuery or die $WholesaleSystem->errstr;
Account Balance Query allows you to obtain the account balance.
my $cert = $WholesaleSystem->getSSLCertificate($certID);
to obtain information for a SSL certificate you?ve recently purchased
my $cert = $WholesaleSystem->getCertSimpleStatus($certID);
my $data = $WholesaleSystem->decodeCSR($csr);
decode the certificate signing request (CSR) you have provided to ensure all the details are correct before purchasing the SSL.
my $data = $WholesaleSystem->generateCSR( 'numOfYears' => '3', 'country' => 'AU', 'state' => 'VIC', 'city' => 'Melbourne', 'organisation' => 'VentraIP', 'organisationUnit' => 'Systems Admin', 'commonName' => 'forums.ventraip.com.au', 'emailAddress' => 'webmaster@ventraip.com.au' );
generate the user a Private Key of 2048 bits in size, a Self Signed Certificate and a CSR request.
my $cert = $WholesaleSystem->purchaseSSLCertificate( csr => $csr, productID => 55, firstName => 'John', lastName => 'Doe', emailAddress => 'john@doe.com', address => 'PO Box 119', city => 'Beaconsfield', state => 'VIC', postCode => '3807', country => 'AU', phone => '+61.390245343', fax => '+61.380806481', ) or die $WholesaleSystem->errstr;
purchase an SSL certificate
my $output = $WholesaleSystem->reissueCertificate($certID, $newCSR);
re-issue the SSL certificate using a new certificate signing request (CSR)
my $output = $WholesaleSystem->cancelSSLCertificate($certID);
cancel an SSL certificate that has not been processed (eg. still pending approval).
my $output = $WholesaleSystem->renewSSLCertificate( certID => $certID, firstName => 'John', lastName => 'Doe', emailAddress => 'john@doe.com', address => 'PO Box 119', city => 'Beaconsfield', state => 'VIC', postCode => '3807', country => 'AU', phone => '+61.390245343', fax => '+61.380806481', ) or die $WholesaleSystem->errstr;
renew an SSL certificate
my $output = $WholesaleSystem->resendDVEmail($certID);
resend the approval email for an SSL certificate
my $output = $WholesaleSystem->resendIssuedCertificateEmail($certID);
resend the original completed certificate email to the customer. This is helpful should your customer loose the details of their SSL and you need to provide the information again.
my @certs = $WholesaleSystem->listAllCerts;
obtain a list of all SSL certificates related to your account
my $output = $WholesaleSystem->getDomainBeacon($certID, $domain);
The domain beacon is used for verification of premium SSL certificates to prove ownership of the domain and ensure the requester has access to the domain in question. The domain beacon file must be saved as the filename returned from the API request and the 'beacon' saved in the file.
my $output = $WholesaleSystem->checkDomainBeacon($certID, $domain);
Upon requesting the domain beacon from 'SSL_getDomainBeacon' this function will then process the SSL for validation against the certificate ID supplied.
55 Trustwave Domain Validated SSL - 1 Year 56 Trustwave Domain Validated SSL - 2 Year 57 Trustwave Domain Validated SSL - 3 Year 58 Trustwave Premium SSL - 1 year 59 Trustwave Premium SSL - 2 year 60 Trustwave Premium SSL - 3 year 61 Trustwave Enterprise SSL - 1 Year 62 Trustwave Enterprise SSL - 2 Year 63 Trustwave Enterprise SSL - 3 Year 64 Trustwave Premium Wildcard SSL - 1 Year 65 Trustwave Premium Wildcard SSL - 2 Year 66 Trustwave Premium Wildcard SSL - 3 Year 67 Trustwave Premium EV SSL - 1 Year 68 Trustwave Premium EV SSL - 2 Year
VentraIP Wholesale <customercare@ventraipwholesale.com.au>
This software is copyright (c) 2011 by VentraIP Wholesale.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
To install Net::WholesaleSystem, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Net::WholesaleSystem
CPAN shell
perl -MCPAN -e shell install Net::WholesaleSystem
For more information on module installation, please visit the detailed CPAN module installation guide.