The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Lingua::AR::Word - Perl extension for getting the stem and ArabTeX encoding of Arabic words

SYNOPSIS

        use utf8;
        use Lingua::AR::Word;

        my $word=Lingua::AR::Word->new(ARABIC_WORD_IN_UTF8);

        open FOUTPUT, ">>:utf8" TEST" or die "Cannot create TEST: $!\n";
        

        print FOUTPUT $word->get_word();
        print FOUTPUT $word->get_stem();
        print FOUTPUT $word->get_arabtex();

        close FOUTPUT;

DESCRIPTION

In order to work on an Arabic word, you need to create the object Lingua::AR::Word, passing the Arabic word encoded in utf8 to the constructor. You will then be able to get the stem through get_stem(). You will get the ArabTeX translittered form through get_arabtex(). If you also want the translation, you'll need to create the $db object (described in the Lingua::AR::Db module), so that it may look for its meaning in the correct Database.

Remember that input-output directly to shell will not be useful as long as your shell doesn't support utf8 encoded characters. In the example above, for example, I piped the output to another file forcing its writing in utf8.

SEE ALSO

You may find more info about ArabTeX encoding at ftp://ftp.informatik.uni-stuttgart.de/pub/arabtex/arabtex.htm

AUTHOR

Andrea Benazzo, <andy@slacky.it>

COPYRIGHT AND LICENSE

Copyright (c) 2006 Andrea Benazzo. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.