view release on metacpan or  search on metacpan

lib/CWB/CEQL.pm  view on Meta::CPAN

23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
    @error_msg = $CEQL->ErrorMessage;
    $html_msg = $CEQL->HtmlErrorMessage;
  }
 
  ## extend or modify standard CEQL grammar by subclassing
  package BNCWEB::CEQL;
  use base 'https://metacpan.org/pod/CWB::CEQL">CWB::CEQL';
 
  sub lemma {
    ## overwrite 'lemma' rule here (e.g. to allow for BNCweb's ``{bucket/N}'' notation)
    my $orig_result = $self->SUPER::lemma($string); # call original rule if needed
  }
 
  ## you can now use BNCWEB::CEQL in the same way as CWB::CEQL
 
=head1
 
=head1 DESCRIPTION
 
B<** TODO **>