NAME
Lingua::Align::Corpus::Factored - Read factored corpora (Moses format)
SYNOPSIS
my
$corpus
= new Lingua::Align::Corpus::Factored(
-file
=>
$corpusfile
);
my
@words
=();
while
(
$corpus
->next_sentence(\
@words
)){
"\n"
,
$corpus
->current_id,
"> "
;
foreach
(0..
$#words
){
"word $_ = "
join
(
','
,@{
$words
[
$_
]});
"\n"
;
}
"---------------------\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.