truncate table warning

diff --git a/parse-node-logs.pl b/parse-node-logs.pl
index 1007c43..ae33018 100755 (executable)
--- a/parse-node-logs.pl
+++ b/parse-node-logs.pl
@@ -13,6 +13,7 @@ my $path = '/home/nodelogs/c405f97667784094bca5cfa52af0bcf1/';
 # select _id,json->'received',time,to_timestamp((json->>'received')::int8/1000) - interval '1 hour' from nodelog ;
 
 my $dbh = DBI->connect("dbi:Pg:dbname=eg5120", "dpavlin", "", { RaiseError => 1 });
+warn "# truncate table nodelog";
 $dbh->do( qq{ truncate table nodelog } ); # FIXME
 my $sth = $dbh->prepare(qq{insert into nodelog (time,json) values (?,?)});