diff --git a/scripts/recaser/detruecase.perl b/scripts/recaser/detruecase.perl index 66ca24fa2..884ebe3df 100755 --- a/scripts/recaser/detruecase.perl +++ b/scripts/recaser/detruecase.perl @@ -83,6 +83,7 @@ sub process { print $_; } print "\n"; + STDOUT->flush; $sentence++; } diff --git a/scripts/recaser/truecase.perl b/scripts/recaser/truecase.perl index cdff621ae..64bf787fa 100755 --- a/scripts/recaser/truecase.perl +++ b/scripts/recaser/truecase.perl @@ -82,6 +82,7 @@ while() { } print $$MARKUP[$#$MARKUP]; print "\n"; + STDOUT->flush } # store away xml markup diff --git a/scripts/tokenizer/detokenizer.perl b/scripts/tokenizer/detokenizer.perl index 41299baf2..9bc6245f3 100755 --- a/scripts/tokenizer/detokenizer.perl +++ b/scripts/tokenizer/detokenizer.perl @@ -64,6 +64,7 @@ while() { } else { print &detokenize($_); } + STDOUT->flush } diff --git a/scripts/tokenizer/tokenizer.perl b/scripts/tokenizer/tokenizer.perl index b84b9eb31..c3014928b 100755 --- a/scripts/tokenizer/tokenizer.perl +++ b/scripts/tokenizer/tokenizer.perl @@ -186,6 +186,7 @@ else { print &tokenize($_); } + STDOUT->flush } }