Changeset 396 for trunk/tiny-import.pl

Timestamp:

09/24/12 17:43:12 (12 years ago)

Author:

Kris Deugau

Message:

/trunk

Track and report count of tinydns records imported sucessfully

File:

• trunk/tiny-import.pl (modified) (3 diffs)

trunk/tiny-import.pl

@@ -127 +127 @@
   my %deleg;
 
+  my $ok = 0;
   while (<FLAT>) {
     if (/^#/ || /^\s*$/) {
@@ -135 +136 @@
     s/\s*$//;
     my $recstat = recslurp($_);
+    $ok++ if $recstat;
     if ($importcfg{rw}) {
       if ($recstat) {
@@ -165 +167 @@
 
   # .. but we can at least say how many records weren't imported.
-  print scalar(@deferred)." deferred records in $flatfile\n";
+  print "$ok OK, ".scalar(@deferred)." deferred records in $flatfile\n";
   $#deferred = -1;