| Summary | Included libraries | Package variables | Synopsis | General documentation | Methods |
| Summary | Top |
| Clair::ALE::Default::Stemmer - ALE's default stemmer. |
| Package variables | Top |
| No package variables defined. |
| Included modules | Top |
| Clair::Utils::porter |
| Inherit | Top |
| Exporter |
| Synopsis | Top |
| This module is used internally by the other ALE modules to stem words. Other modules (particularly Clair::ALE::Search) will use this automatically, so you shouldn't have to use it yourself unless you're writing an ALE module. It is a thin frontend for a standard Porter stemmer. It's main purpose is to make it easy to change stemmers without having to change any other code. |
| Description | Top |
| Methods | Top |
| _ale_stem | No description | Code |
| ale_stem | No description | Code |
| ale_stemsome | No description | Code |
| new | No description | Code |
| stem | No description | Code |
| stemsome | No description | Code |
| _ale_stem | description | prev | next | Top |
sub _ale_stem
{shift if (ref $_[0]); Clair::Utils::porter::porter($_[0]);} |
| ale_stem | description | prev | next | Top |
sub ale_stem
{shift if (ref $_[0]); Clair::Utils::porter::porter($_[0]);} |
| ale_stemsome | description | prev | next | Top |
sub ale_stemsome
{
return map { ale_stem($_) } @_;} |
| new | description | prev | next | Top |
sub new
{
my $class = shift;
my $self = {};
bless $self,$class;} |
| stem | description | prev | next | Top |
sub stem
{my $self = shift; goto &ale_stem;} |
| stemsome | description | prev | next | Top |
sub stemsome
{my $self = shift; goto &ale_stemsome;} |