1 <% include("/elements/header.html","Whois $domain", menubar(
3 ? ( "View this customer (#$display_custnum)" => "${p}view/cust_main.cgi?$custnum",
7 "View this domain (#$svcnum)" => "${p}view/svc_domain.cgi?$svcnum",
10 <PRE><% $whois %></PRE>
12 <% include('/elements/footer.html') %>
16 my $svcnum = $cgi->param('svcnum');
17 my $custnum = $cgi->param('custnum');
18 my $domain = $cgi->param('domain');
22 my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } );
23 $display_custnum = $cust_main->display_custnum;
26 my $whois = eval { whois($domain) };
28 ( $whois = $@ ) =~ s/ at \/.*Net\/Whois\/Raw\.pm line \d+.*$//s;