Mercurial > hg > anonet-resdb
changeset 1132:2fd95bea3988 draft
updated whoid
| author | epoch <epoch@hacking.allowed.org> |
|---|---|
| date | Fri, 23 Aug 2013 18:22:48 +0000 |
| parents | 16cef39f682d |
| children | 1a5d655cae9c |
| files | contrib/whoisd/whoisd.pl |
| diffstat | 1 files changed, 9 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/contrib/whoisd/whoisd.pl Fri Aug 23 03:24:54 2013 +0000 +++ b/contrib/whoisd/whoisd.pl Fri Aug 23 18:22:48 2013 +0000 @@ -97,3 +97,12 @@ $out =~ s/\n//g; printf "%-20s %s\n", "ASN" . ":", $out; } + +foreach(split(/\n/,`grep -i -e "^$QUERY\$" "$RESDB/db/dom"/*/*/owner`)) { + $out = $_; + $out =~ s/.*\/db\/dom\/(.+?)\/(.+?)\/owner.*/\2\.\1/; + if ($out ne "") { #fix this comparison. + printf "%-20s %s\n", "domain" . ":", $out; + } +} +#printf "%-20s %s\n", "notice:","$QUERY did not claim any domains yet";