NAME
Lingua::Align::Corpus::Factored - Read factored corpora (Moses format)
SYNOPSIS
use Lingua::Align::Corpus::Factored;
my $corpus = new Lingua::Align::Corpus::Factored(-file => $corpusfile);
my @words=();
while ($corpus->next_sentence(\@words)){
print "\n",$corpus->current_id,"> ";
foreach (0..$#words){
print "word $_ = "
print join(',',@{$words[$_]});
print "\n";
}
print "---------------------\n";
}
DESCRIPTION
SEE ALSO
AUTHOR
Joerg Tiedemann
COPYRIGHT AND LICENSE
Copyright (C) 2009 by Joerg Tiedemann
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.8 or, at your option, any later version of Perl 5 you may have available.