support exclude column

This commit is contained in:
Matthew Slowe 2023-10-25 11:16:15 +01:00
parent 7888387315
commit 67915b71dd

View File

@ -4,7 +4,7 @@ use DBI;
my $db = DBI->connect("dbi:SQLite:dbname=rivers.db") or die $DBI::errstr;
my $stations_st = $db->prepare("select id, name, watercourse from stations");
my $stations_st = $db->prepare("select id, name, watercourse from stations where exclude<>'yes'");
$stations_st->execute();
my $stations = $stations_st->fetchall_hashref("id");