Wrap INSERTs in a transaction.
[ccbs] / parse / parse-wiki-songlist.pl
index 169dbd2..3f13118 100644 (file)
@@ -4,6 +4,8 @@ use warnings;
 
 # Parses songlist from the DDRNO wiki
 
+print "begin;\n";
+
 while (<>) {
        m/
          \|   \s* \[\[ (.*?) \]\] \s*    # song name
@@ -46,5 +48,6 @@ while (<>) {
                printf "INSERT INTO songratings (song,playmode,difficulty,feetrating) VALUES ((SELECT song FROM songs WHERE title='%s'),'%s','%s',%u);\n",
                        $songname, $t->[0], $t->[1], $t->[2];
        }
-       
 }
+
+printf "commit;\n";