diff options
Diffstat (limited to 'tools/mob_db.pl')
| -rwxr-xr-x | tools/mob_db.pl | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/tools/mob_db.pl b/tools/mob_db.pl index de4e1b15e..e6eb859c4 100755 --- a/tools/mob_db.pl +++ b/tools/mob_db.pl @@ -77,21 +77,21 @@ while ($ligne=<STDIN>) $ligne = $&; if ($ligne =~ /^\/\//) { - printf("# %s\n", $ligne); + printf("# "); + $ligne = substr($ligne, 2); + } + @champ = split (",",$ligne); + if ($#champ != $nb_columns - 1) + { + # Can't parse, it's a real comment + printf ("%s\n", $ligne); } else { - @champ = split (",(?![^{]*[})])",$ligne); - if ($#champ != $nb_columns - 1) + printf("REPLACE INTO `%s` VALUES (", $db); + for ($i=0; $i<$#champ; $i++) { - printf ("# WARNING BAD LINE : %d (%s)\n", $#champ, $ligne); - printf STDERR ("Warning : can't parse %s\n", $ligne); - } else { - printf("REPLACE INTO `%s` VALUES (", $db); - for ($i=0; $i<$#champ; $i++) - { - printField($champ[$i],",",$i); - } - printField($champ[$#champ],");\n",$#champ); + printField($champ[$i],",",$i); } + printField($champ[$#champ],");\n",$#champ); } } } |