Index: /trunk/tiny-import.pl
===================================================================
--- /trunk/tiny-import.pl	(revision 358)
+++ /trunk/tiny-import.pl	(revision 359)
@@ -246,4 +246,19 @@
       $cnt{A}++;
 
+      my ($host,$ip,$ttl,$stamp,$loc) = split /:/, $rec, 5;
+      $host =~ s/^\+//;
+      $host =~ s/\.$//;
+      $ttl = 0 if !$ttl;
+      $stamp = '' if !$stamp;
+      $loc = '' if !$loc;
+      $loc = '' if $loc =~ /^:+$/;
+
+      my $domid = DNSDB::_hostparent($dbh, $host);
+      if ($domid) {
+	$recsth->execute($domid, 0, $host, 1, $ip, 0, 0, 0, $ttl);
+      } else {
+	push @deferred, $rec unless $nodefer;
+      }
+
     } elsif ($rec =~ /^Z/) {
       $cnt{SOA}++;
@@ -273,5 +288,5 @@
 
       my ($zone,$ip,$host,$dist,$ttl,$stamp,$loc) = split /:/, $rec, 7;
-      $zone =~ s/^\.//;
+      $zone =~ s/^\@//;
       $zone =~ s/\.$//;
       $host =~ s/\.$//;