File: addfiltercount.pl

package info (click to toggle)
pronto 2.4.0-3
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 3,112 kB
  • ctags: 488
  • sloc: perl: 22,159; makefile: 140; sh: 34; sql: 7
file content (16 lines) | stat: -rwxr-xr-x 486 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
#!/usr/bin/perl
require 'prontolib.pl';
read_prefs();
$conn = &open_db_conn;
if ($prefs{'DatabaseDriver'} eq "mysql") {
$sql = "alter table filters add count int";
} elsif ($prefs{'DatabaseDriver'} eq "Pg") {
$sql = "alter table filters add column count int";
} elsif ($prefs{'DatabaseDriver'} eq "CSV") {
print("CSV: You will have to add the count field manually !"); exit;
}
$query = $conn->prepare($sql);
$query->execute();

$sql = "update filters set count = '0'";
$conn->do($sql);