WWW::CNic (3pm)

        use WWW::CNic;

        my @suffixlist = qw(uk.com us.com de.com eu.com);

        my $query = WWW::CNic->new(command => 'search', 'domain' => 'example');

        $query->set(suffixlist => \@suffixlist);

        my $response = $query->execute;

        if ($response->is_error) {
                printf("Error: %s\n", $response->error);

        } else {
                foreach my $suffix(@suffixlist) {
                        if ($response->is_registered) {
                                printf("Domain %s.%s is registered to %s\n", $domain, $suffix, $response->registrant($suffix));

                        } else {
                                printf("Domain %s.%s is available for registration\n", $domain, $suffix);

                        }
                }
        }

\*(C`WWW::CNic\*(C' provides a powerful object-oriented Perl interface to the CentralNic Toolkit system.

The design of \*(C`WWW::CNic\*(C' is inspired greatly by \*(C`LWP\*(C', which is a prerequisite. Essentially, making a transaction requires building a request object, which is then executed and returns a response object. While each transaction type (search, registration, modification...) requires a different set of data to be sent by the client, all the response objects have common properties, inherited from the \*(C`WWW::CNic::Response\*(C' base class, with just a few extra methods for accessing specific information.

Installing \*(C`WWW::CNic\*(C' is as simple as:

cd /usr/src wget http://toolkit.centralnic.com/dist/WWW-CNic-x.xx.tar.gz tar zxvf WWW-CNic-x.xx.tar.gz cd WWW-CNic-x.xx perl Makefile.PL make make install

1.

\*(C`LWP\*(C' - the \s-1WWW\s0 Library for Perl. This in turn requires \*(C`libnet\*(C', \*(C`URI\*(C' and \*(C`HTML::Parser\*(C'.

2.

An \s-1SSL\s0 toolkit (\*(C`Crypt::SSLeay\*(C', \*(C`IO::Socket::SSL\*(C') for doing \s-1HTTPS\s0 transactions.

3.

\*(C`Digest::MD5\*(C' is needed for hashing passwords.

Consult WWW::CNic::Cookbook for detailed information on using WWW::CNic.

my $query = WWW::CNic->new( [OPTIONS] );

The constructor for this class accepts the following options:

1.

\*(C`username\*(C' - only needed for doing domain registrations and modifications. This is the User \s-1ID\s0 of your Registrar Handle.

2.

\*(C`password\*(C' - the password for your Registrar Handle.

3.

\*(C`command\*(C' - required for every transaction. This is a scalar containing the command name. The list of allowed commands is always growing, you should consult the Toolkit website for a complete list.

4.

\*(C`domain\*(C' - only needed for domain registrations, modifications and other commands that act upon domains.

5.

\*(C`host\*(C' - allows you to use to a non-standard host. This is mainly useful for client debugging purposes.

6.

\*(C`test\*(C' - when set to 1, this causes any domain registration and modification transactions to use the test database. Again, this is useful for testing and debugging.

7.

\*(C`keep_alive\*(C' - by default, WWW::CNic will use \*(C`LWP::ConnCache\*(C' to cache server connections. Setting \*(C`keep_alive\*(C' to 0 or \*(C`undef\*(C' will turn this off.

$query->set( NAME => VALUE );

This method allows you to set any number of parameters prior to executing the query. The specifics of what parameters are required for what type of transaction is explained in WWW::CNic::Cookbook.

my $response = $query->execute();

This method makes the transaction and returns an instance of a \*(C`WWW::CNic::Response\*(C' child class.

This module is (c) 2011 CentralNic Ltd. All rights reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

• http://toolkit.centralnic.com/

• WWW::CNic::Cookbook

• WWW::CNic::Simple