X-Git-Url: https://git.distorted.org.uk/~mdw/dvddb/blobdiff_plain/75a5b9248f89fd40189035093b751a7bbcd0292d..b2a25885cb81761a2b33014a00f843e76f4ce83c:/upgrade-v3 diff --git a/upgrade-v3 b/upgrade-v3 index e3cc8bb..f2098c3 100755 --- a/upgrade-v3 +++ b/upgrade-v3 @@ -10,17 +10,14 @@ BEGIN { binmode STDOUT, ":utf8"; } my $DB = DBI->connect("dbi:Pg:host=roadstar", "", "", { AutoCommit => 0, RaiseError => 1 }); -my $st_outer = - $DB->prepare("SELECT title, COUNT(*) FROM old_dvd GROUP BY title"); -my $st_inner = - $DB->prepare("SELECT disc, path, discid FROM old_dvd WHERE title = ?"); -my $st_add_set = - $DB->prepare("INSERT INTO dvd_set (name, ndisc) - VALUES (?, ?) - RETURNING id"); -my $st_add_disc = - $DB->prepare("INSERT INTO dvd_disc (set_id, disc, path, disc_id) - VALUES (?, ?, ?, ?)"); +my $st_outer = $DB->prepare + ("SELECT title, COUNT(*) FROM old_dvd GROUP BY title"); +my $st_inner = $DB->prepare + ("SELECT disc, path, discid FROM old_dvd WHERE title = ?"); +my $st_add_set = $DB->prepare + ("INSERT INTO dvd_set (name, ndisc) VALUES (?, ?) RETURNING id"); +my $st_add_disc = $DB->prepare + ("INSERT INTO dvd_disc (set_id, disc, path, disc_id) VALUES (?, ?, ?, ?)"); $st_outer->execute; OUTER: for (;;) {