Printing insert statements is not necessary

diff --git a/bin/add-history-records.pl b/bin/add-history-records.pl
index 722de47..14d7231 100755 (executable)
--- a/bin/add-history-records.pl
+++ b/bin/add-history-records.pl
@@ -40,7 +40,7 @@ foreach my $table (@tables) {
 
     unless ($h_rec) {
       my $h_insert_rec = $rec->_h_statement('insert', 1);
-      print $h_insert_rec . "\n";
+      #print $h_insert_rec . "\n";
       $dbh->do($h_insert_rec);
       die $dbh->errstr if $dbh->err;
       $dbh->commit or die $dbh->errstr;