Skip to content
Snippets Groups Projects
Commit d7432fee authored by Alexis Nasr's avatar Alexis Nasr
Browse files

added eval_mcf.pl

parent d07836d6
No related branches found
No related tags found
No related merge requests found
#!/usr/bin/perl
$arg = shift;
while($arg){
if($arg eq "-g"){$ref = shift;}
elsif($arg eq "-s"){$hyp = shift;}
......@@ -36,7 +38,7 @@ $arg = shift;
}
# determine the column in the reference file
#
$ref_form_col = 0;
$ref_pos_col = 1;
$ref_lemma_col = 2;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment