summaryrefslogtreecommitdiff
path: root/util/cleanimg.pl
diff options
context:
space:
mode:
Diffstat (limited to 'util/cleanimg.pl')
-rw-r--r--util/cleanimg.pl11
1 files changed, 10 insertions, 1 deletions
diff --git a/util/cleanimg.pl b/util/cleanimg.pl
index 527fdb3a..45032106 100644
--- a/util/cleanimg.pl
+++ b/util/cleanimg.pl
@@ -1,5 +1,12 @@
#!/usr/bin/perl
+
+
+#
+# O L D - D O N O T U S E !
+#
+
+
use strict;
use warnings;
use Time::HiRes 'gettimeofday', 'tv_interval';
@@ -12,9 +19,11 @@ use Image::MetaData::JPEG;
use File::Copy 'cp', 'mv';
use Digest::MD5;
+require '/www/vndb/lib/global.pl';
+
our $ST;
-my $sql = DBI->connect('dbi:Pg:dbname=vndb', 'vndb', 'passwd',
+my $sql = DBI->connect(@VNDB::DBLOGIN,
{ RaiseError => 1, PrintError => 0, AutoCommit => 1, pg_enable_utf8 => 1 });
my $imgpath = '/www/vndb/static/img';