perl - I want to display the registrant details using Net::WhoisNG module -
i want display registrant details using net::whoisng perl module. can tell me how that? using below code perl script.
use net::whoisng; $type='registrant'; $w=new net::whoisng($domain); if(!$w->lookup()){ print "domain not found\n"; exit; } else{ getregistrant(); } sub getregistrant { $self = shift; $self->{'registrant'}; print "getregis $self"; #this line prints hash value. } trierd function sub get_reg_info { @contact = ""; if($w->lookup()){ @contact=$w->getperson($type); print "get_reg @contact\n"; }
Comments
Post a Comment