Use ND::DB module instead of db.pl

[ndwebbie.git] / scripts / parsedumps.pl

diff --git a/scripts/parsedumps.pl b/scripts/parsedumps.pl
index f1738bf06efd7f54c9c916a08e6be40542250574..d22525fd87b776a83a393db456157ed97ac73507 100755 (executable)
--- a/scripts/parsedumps.pl
+++ b/scripts/parsedumps.pl
@@ -30,17 +30,9 @@ use LWP::Simple;
 use lib qw{/var/www/ndawn/};
 
 use ND::Include;
+use ND::DB;
 
-our $dbh;
-for my $file ("/home/whale/db.pl")
-{
-       unless (my $return = do $file){
-               warn "couldn't parse $file: $@" if $@;
-               warn "couldn't do $file: $!"    unless defined $return;
-               warn "couldn't run $file"       unless $return;
-       }
-}
-#$dbh->trace("0","/tmp/parsedumps");
+our $dbh = ND::DB::DB();
 
 $ND::DBH = $dbh;