debian/sqliteconv2.pl


1
2
3
4
5
6
7
8

#!/usr/bin/perl
# converts extended SQL inserts to single statements
if (/^(INSERT.+?VALUES.*?)\(/) {
   $a=$1;
   s/\\'\''/'\'\''/g;
   s/\\n/\n/g;
   s/\),\(/\);\n$a\(/g;
}