my $elem = lc($element);
  unless( $data =~ /\Q$elem\E/ ) {
    push( @more_candidates, $element );
  }