/[Lingua-Spelling-Alternative]/Alternative.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /Alternative.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by dpavlin, Mon Feb 11 20:19:59 2002 UTC revision 1.4 by dpavlin, Tue Feb 12 12:41:31 2002 UTC
# Line 13  $VERSION = '0.01'; Line 13  $VERSION = '0.01';
13  #@EXPORT = qw();  #@EXPORT = qw();
14  @EXPORT_OK = qw(  @EXPORT_OK = qw(
15          &alternatives          &alternatives
         &load_affix  
16          );          );
17    
18  my $debug=0;  my $debug=0;
# Line 152  sub alternatives { Line 151  sub alternatives {
151          return @out;          return @out;
152  }  }
153    
154    #
155    # function which return minimal word of all alternatives
156    #
157    
158    sub minimal {
159            my $self = shift;
160            my @out;
161            foreach my $word (@_) {
162                    my @alt = $self->alternatives($word);
163                    my $minimal = shift @alt;
164                    foreach (@alt) {
165                            $minimal=$_ if (length($_) < length($minimal));
166                    }
167                    push @out,$minimal;
168            }
169            return @out;
170    }
171    
172  ###############################################################################  ###############################################################################
173  1;  1;
174  __END__  __END__
# Line 180  entered in search engine) Line 197  entered in search engine)
197    
198  =item new  =item new
199    
200  The new() constructor (without parameters) create container for new  The new() constructor (without parameters) create container for new language.
201  language.  Only parametar it supports is DEBUG which turns on (some) debugging output.
 Only parametar it supports is DEBUG which turns on (some) debugging  
 output.  
202    
203  =item load_affix  =item load_affix
204    
205  Function load_affix loads ispell's affix file.  Function load_affix loads ispell's affix file for later usage.
206    
207    =item load_findaffix
208    
209    This function loads output of findaffix program from ispell package.
210    This is better idea (if you are creating affix file for particular language
211    yourself) because affix file from ispell (which is created from data returned
212    by findaffix) is limited to 26 entries (because each entry is denoted by
213    single character).
214    
215  =item alternatives  =item alternatives
216    
217  Function alternatives  Function alternatives return all alternative spellings of particular
218    word(s). It will also return spelling which are not correct if there is
219    rule like that in affix file.
220    
221    =item minimal
222    
223    This function returns minimal of all alternatives of a given word(s). It's
224    a poor man's version of normalize (because we don't know gramatic of
225    particular language, just some spelling rules).
226    
227  =head1 PRIVATE METHODS  =head1 PRIVATE METHODS
228    
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.26