my %lookup;
{
   my $lookup = $ARGS{lookup};
   if (ref($lookup)) {
      $lookup{$lookup} = 1;
   } else {
      $lookup{$_} = 1 foreach (@$lookup);
   }
}

print($_, ': ', ($lookup{$_}?"checked":"not checked"), $/)
   foreach (qw(partof morph fuzzy regex));