Wrap INSERTs in a transaction.
authorSteinar H. Gunderson <sesse@samfundet.no>
Sun, 13 Feb 2005 16:46:23 +0000 (16:46 +0000)
committerSteinar H. Gunderson <sesse@samfundet.no>
Sun, 13 Feb 2005 16:46:23 +0000 (16:46 +0000)
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";