SYNOPSIS
use Text::Affixes;
my $text = "Hello, world. Hello, big world.";
my $prefixes = get_prefixes($text);
# $prefixes now holds
# {
# 3 => {
# 'Hel' => 2,
# 'wor' => 2,
# }
# }
# or
$prefixes = get_prefixes({min => 1, max => 2},$text);
# $prefixes now holds
# {
# 1 => {
# 'H' => 2,
# 'w' => 2,
# 'b' => 1,
# },
# 2 => {
# 'He' => 2,
# 'wo' => 2,
# 'bi' => 1,
# }
# }
# the use for get_sufixes is similarDESCRIPTION
This module, still in its early stages, is meant to be used in Natural Language Processing tools that require Prefixe or Sufixe examination of text.
TO DO
Improve the documentation
Make it more efficient (use C for that)
Add object interface
AUTHOR
Jose Alves de Castro, <cog@cpan.org>
COPYRIGHT AND LICENSE
Copyright (C) 2004 by Jose Castro
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.3 or, at your option, any later version of Perl 5 you may have available.