don't commit with DEBUG=1

diff --git a/ferweb-import-report.pl b/ferweb-import-report.pl
index 2e7a889..20960af 100755 (executable)
--- a/ferweb-import-report.pl
+++ b/ferweb-import-report.pl
@@ -81,6 +81,6 @@ while( my $row = $s->fetchrow_hashref ) {
 
 }
 
-$k->commit;
+$k->commit unless $ENV{DEBUG};
 
 warn "# stat ", dump( $stat ),$/;