my @db;
open(my $fh, "<", $config{db}) or die "$config{db}: $!";
while (<$fh>){
  push(@db, $_);
}