projects
/
BackupPC.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r8656@llin: dpavlin | 2005-10-22 17:40:26 +0200
[BackupPC.git]
/
dbxml
/
convert_pgsql_xmldb.pl
diff --git
a/dbxml/convert_pgsql_xmldb.pl
b/dbxml/convert_pgsql_xmldb.pl
index
c9c9995
..
089c957
100755
(executable)
--- a/
dbxml/convert_pgsql_xmldb.pl
+++ b/
dbxml/convert_pgsql_xmldb.pl
@@
-19,9
+19,11
@@
my $xmldb_container = 'backuppc.dbxml';
my $connect = "DBI:Pg:dbname=backuppc";
my $commit_every = 100;
my $connect = "DBI:Pg:dbname=backuppc";
my $commit_every = 100;
+my $limit = 0; # no limit
+#$limit = 1000;
my $bar = Term::ProgressBar->new({
my $bar = Term::ProgressBar->new({
- count => 100,
+ count => 100
0
,
# fh => \*STDOUT,
# name => 'thingy',
ETA => 'linear',
# fh => \*STDOUT,
# name => 'thingy',
ETA => 'linear',
@@
-82,9
+84,10
@@
join backups on shares.hostid = backups.hostid
and files.backupnum = backups.num
and shares.id = backups.shareid
order by backups.date
and files.backupnum = backups.num
and shares.id = backups.shareid
order by backups.date
-limit 1000
};
};
+$sql .= qq{ limit $limit } if ($limit);
+
_debug("prepare");
my $sth = $dbh->prepare($sql) || die $dbh->errstr();
_debug("execute");
_debug("prepare");
my $sth = $dbh->prepare($sql) || die $dbh->errstr();
_debug("execute");