X-Git-Url: https://git.sesse.net/?p=ccbs;a=blobdiff_plain;f=parse%2Fparse-ddreurope-tournament.pl;h=9338ad29b418e8975ee80bb0ed52b0b1fce90f4b;hp=83b95f226f5fb0b2bd80f40c31860e8824868f41;hb=905e6c9f072de56b750e1aa2a34f64a528e205e9;hpb=e81c2d9126e54860c49eb224f44dc50467790e84 diff --git a/parse/parse-ddreurope-tournament.pl b/parse/parse-ddreurope-tournament.pl index 83b95f2..9338ad2 100644 --- a/parse/parse-ddreurope-tournament.pl +++ b/parse/parse-ddreurope-tournament.pl @@ -70,8 +70,9 @@ while (<>) { } # chosen songs - while (s/ .*? class="link"> (.*?) <\/a> .*? (\d+) <\/td>//x) { + while (s/ .*? class="link"> (.*?) <\/a> .*? (\d+) <\/td>//x) { my $song = song_map($1); + my $score = $2; $song =~ s/'/\\'/g; printf "INSERT INTO scores (tournament, round, parallel, player, song, chosen, score) VALUES (\n"; @@ -80,7 +81,7 @@ while (<>) { print " (SELECT player FROM players WHERE nick='$player'),\n"; print " (SELECT song FROM songs WHERE lower(title)=lower('$song')),\n"; print " 't',\n"; - print " $2);\n"; + print " $score);\n"; } }