SYNOPSIS

use MYDan::Util::WhoIs;
my $w = MYDan::Util::WhoIs->new()

$w->whois( 'hostname.abc' );
$w->search( 'abc' );