The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

AM::Abbreviate - Expand or Contract Amharic Abbreviations

SYNOPSIS

  use Lingua::AM::Abbreviate;

        while ( $string = <> ) {  # some UTF8 string
                if ( $contracted = Contract ( $string ) ) {
                        print "$string => $contracted\n";
                } elsif ( $expanded = Expand ( $string ) ) {
                        print "$string => $expanded\n";
                }
        }

DESCRIPTION

AM::Abbreviate provides two routines, "Expand" and "Contract", to assist in Amharic translation or spell checking. Each routine expects an Amharic string in UTF8 encoding as an argument and returns an expansion or contraction if found.

AUTHOR

Daniel Yacob, LibEth@EthiopiaOnline.Net

SEE ALSO

perl(1). Ethiopic(3), http://libeth.netpedia.net