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

Popular posts from this blog

assembly - 8086 TASM: Illegal Indexing Mode -

Java, LWJGL, OpenGL 1.1, decoding BufferedImage to Bytebuffer and binding to OpenGL across classes -

javascript - addthis share facebook and google+ url -