$songname =~ s/'/\\'/g;
$artist =~ s/'/\\'/g;
- printf "INSERT INTO songs (title,artist,minbpm,maxbpm) VALUES ('%s','%s',0,0);\n",
- $songname, $artist;
+ # Insert the song only if it doesn't already exist
+ printf "INSERT INTO songs SELECT nextval('songs_song_seq') AS song, '%s' AS title, '%s' AS artist, 0 AS minbpm, 0 AS maxbpm WHERE '%s' NOT IN ( SELECT title FROM songs );\n",
+ $songname, $artist, $songname;
for my $t (['single', 'beginner', $sb],
['single', 'standard', $ss],