/ 
Email-Store-Language-0.03
River stage zero No dependents
/ Email::Store::Language

NAME

Email::Store::Language - Add language identification to emails and lists

SYNOPSIS

Remember to create the database table:

% make install
% perl -MEmail::Store="..." -e 'Email::Store->setup'

And now:

for( $mail->languages ) {
    print $_->language . "\n";
}

or

for( $list->languages ) {
    print $_->language . "\n";
}

DESCRIPTION

This module will help you auto-identify the language of your messages and lists. There are some options you can use to help refine the process.

set_active_languages

This is a method from Lingua::Identify that will let you limit what languages your messages should be checked against.

# limit to english and french
use Lingua::Identify qw( set_active_languages );
set_active_languages( qw( en fr ) );

$EMAIL::Store::Language::OPTIONS

This is a hashref of options that will be passed as the first argument to langof(). There is one exception: the threshold option. threshold should be a number (percentage) between 0 and 1. The default is 0.5.

$Email::Store::Language::OPTIONS = { threshold => 0.35 };

In the above example, a threshold of 0.35 means that, for mail language identification, if Lingua::Identify claims to be 35% sure that the message is a given language it will store that language. If no languages are above the threshold, then the language of most confidence will be used.

For list identification, it means that if 35% of the messages are identified as being a given language, then it will store that language. If no languages are above the threshold, then the language of most confidence will be used.

SEE ALSO

  • Email::Store

  • Lingua::Identify

AUTHOR

  • Brian Cassidy <bricas@cpan.org>

COPYRIGHT AND LICENSE

Copyright 2006 by Brian Cassidy

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.