Index: /trunk/DNSDB.pm
===================================================================
--- /trunk/DNSDB.pm	(revision 584)
+++ /trunk/DNSDB.pm	(revision 585)
@@ -3967,4 +3967,10 @@
 
   # prep for validation
+  # Autodetect formal .arpa names
+  if ($$val =~ /\.arpa\.?$/) {
+    my ($code,$tmpval) = _zone2cidr($$val);
+    return ('FAIL', $tmpval) if $code eq 'FAIL';
+    $$val = $tmpval;
+  }
   my $addr = NetAddr::IP->new($$val);
   $$host =~ s/\.+$//;	# FQDNs ending in . are an internal detail, and really shouldn't be exposed in the UI.
