Allow up to 6 character TLDs.

.travel and .museum are 6 characters long, so increase our previous TLD
limit from 4 to 6.

git-archimport-id: noodles@earth.li--pie/autodns--mainline--1.0--patch-16

diff --git a/autodns.pl b/autodns.pl
index 67beb7a92a8f9c65cc003298d9bf0ae2915421ee..fa4e09b6a337cb4005e18f1a2b62d126ad5e3571 100755 (executable)
--- a/autodns.pl
+++ b/autodns.pl
@@ -74,7 +74,7 @@ sub valid_domain($) {
        my $domain = shift;
        $domain = lc $domain;
 
-       if ($domain =~ /^(?:[a-z0-9-]+\.)+[a-z]{2,4}$/) {
+       if ($domain =~ /^(?:[a-z0-9-]+\.)+[a-z]{2,6}$/) {
                return 1;
        } elsif ($domain =~ /^(?:[0-9\/-]+\.)+in-addr.arpa$/) {
                return 1;