remove-segmentation-markup.perl « support « ems « scripts - github.com/moses-smt/mosesdecoder.git - Unnamed repository; edit this file 'description' to name the repository.

Welcome to mirror list, hosted at ThFree Co, Russian Federation.

remove-segmentation-markup.perl « support « ems « scripts - github.com/moses-smt/mosesdecoder.git - Unnamed repository; edit this file 'description' to name the repository.

index : github.com/moses-smt/mosesdecoder.git

Unnamed repository; edit this file 'description' to name the repository.

www-data

summary refs log tree commit diff

path: root/scripts/ems/support/remove-segmentation-markup.perl

blob: 3b02bceaf2a8e2fe6e95fe568b3baf2a527d6a50 (plain)

#!/usr/bin/env perl
#
# This file is part of moses.  Its use is licensed under the GNU Lesser General
# Public License version 2.1 or, at your option, any later version.

use warnings;
use strict;

$|++;

while(<STDIN>) {
  s/ \|\d+\-\d+\| / /g;
  s/ \|\d+\-\d+\|$//;
  print $_;
}