diff options
author | Hieu Hoang <hieuhoang@gmail.com> | 2015-05-05 16:54:35 +0300 |
---|---|---|
committer | Hieu Hoang <hieuhoang@gmail.com> | 2015-05-05 16:54:35 +0300 |
commit | 2acb5903948688e43decec87ffec5ce9d8a7bd5a (patch) | |
tree | 680ebfc40357eede44ddb93621d8ca8f31cb7325 | |
parent | d006c6ef8c63fc6530c75d7e28519a9ab26464f1 (diff) |
output bleu for multi-bleu hack
-rwxr-xr-x | scripts/ems/support/report-experiment-scores.perl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/scripts/ems/support/report-experiment-scores.perl b/scripts/ems/support/report-experiment-scores.perl index 2e433f291..ef64d4c2d 100755 --- a/scripts/ems/support/report-experiment-scores.perl +++ b/scripts/ems/support/report-experiment-scores.perl @@ -20,6 +20,9 @@ $TYPE{"bolt-bleu-c"} = "BLEU-c"; $TYPE{"bolt-ter"} = "TER"; $TYPE{"bolt-ter-c"} = "TER-c"; +$TYPE{"multi-bleu-detok"} = "BLEU"; +$TYPE{"multi-bleu-c-detok"}= "BLEU-c"; + my %SCORE; my %AVERAGE; foreach (@ARGV) { @@ -59,7 +62,8 @@ sub process { elsif ($type eq 'ibm-bleu' || $type eq 'ibm-bleu-c') { $SCORE{$set} .= &extract_ibm_bleu($file,$type)." "; } - elsif ($type eq 'multi-bleu' || $type eq 'multi-bleu-c') { + elsif ($type eq 'multi-bleu' || $type eq 'multi-bleu-c' + || $type eq 'multi-bleu-detok' || $type eq 'multi-bleu-c-detok') { $SCORE{$set} .= &extract_multi_bleu($file,$type)." "; } elsif ($type eq 'meteor') { |