Select Code to Download

use strict;
use warnings;
...
    return ({status=>$status, ns=>\@ns},"($whois_server answer)\n\n$ra
+w_dominfo");
}