my @bool_keys= qw( case wholeword startverse endverse flexdelimit regex yn );
@{$_}{@bool_keys}= resetBadBooleans(@{$_}{@bool_keys})
  for @$searches;