NAME

Language::Guess

ABSTRACT

A statistical language guesser

SYNOPSIS

use Langauge::Guess;

my $guesser = Language::Guess->new( modeldir => '~/train' );

while (my $line = <> ) {
	my $lang = $guesser->simple_guess($line);
	print "Language was $lang\n\n";
}

COPYRIGHT

(c) 2004 National Institute for Technology and Liberal Education

LICENSE

This software is released under version 2.0 of the GNU Public License

AUTHOR

Maciej Ceglowski <maciej@ceglowski.com>