Net::EPP::ResponseCodes - a module to export some constants that correspond to EPP response codes
use Net::EPP::ResponseCodes; use Net::EPP::Simple; use strict; my $epp = Net::EPP::Simple->new( host => 'epp.nic.tld', user => 'my-id', pass => 'my-password', ); my $result = $epp->domain_transfer_request('example.tld', 'foobar', 1); if ($result) { print "Transfer initiated OK\n"; } else { if ($Net::EPP::Simple::Code == OBJECT_PENDING_TRANSFER) { print "Error: domain is already pending transfer\n"; } elsif ($Net::EPP::Simple::Code == INVALID_AUTH_INFO) { print "Error: invalid authcode provided\n"; } elsif ($Net::EPP::Simple::Code == OBJECT_DOES_NOT_EXIST) { print "Error: domain not found\n"; } elsif ($Net::EPP::Simple::Code == STATUS_PROHIBITS_OP) { print "Error: domain cannot be transferred\n"; } else { print "Error code $Net::EPP::Simple::Code\n"; } }
Every response sent to the client by an EPP server contains a <result> element that has a code attribute. This is a four-digit numeric code that describes the result of the request. This module exports a set of constants that provide handy mnemonics for each of the defined codes.
<result>
code
Net::EPP::ResponseCodes exports the following constants. The number in brackets is the integer value associated with the constant.
Net::EPP::ResponseCodes
To install Net::EPP, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Net::EPP
CPAN shell
perl -MCPAN -e shell install Net::EPP
For more information on module installation, please visit the detailed CPAN module installation guide.