Mercurial > hg > anonet-resdb
changeset 1243:b8624e57fd96 draft
added case-insensitive matching to ASN queries.
author | epoch <epoch@hack.thebackupbox.net> |
---|---|
date | Sat, 21 Mar 2020 08:56:18 +0000 |
parents | 499aae037a7d |
children | f1d3deaa98d2 |
files | contrib/whoisd/whoisd.pl db/dom/ano/whois/ns/ns1.whois.ano db/dom/ano/whois/ns/ns2.whois.ano |
diffstat | 3 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/contrib/whoisd/whoisd.pl Thu Sep 05 02:36:34 2019 +0000 +++ b/contrib/whoisd/whoisd.pl Sat Mar 21 08:56:18 2020 +0000 @@ -5,7 +5,8 @@ use strict; #maybe chroot this whoisd? -my $RESDB = "/services/resdb/resdb"; +#my $RESDB = "/services/resdb/resdb"; +my $RESDB = "/var/db/resdb"; my $HACK=0; my $QUERY=<stdin>; @@ -103,7 +104,7 @@ } sub ASN_lookup { - if($QUERY =~ m/^AS(.+?)$/) { + if($QUERY =~ m/^AS(.+?)$/i) { printf "%% AS section for %s\n", $QUERY; my $AS=$1; chdir("$RESDB/db/as") || die "%% error";