From 0b528dff0ff3dec0dd7a65b6cda84483092dacfb Mon Sep 17 00:00:00 2001
From: redpony <redpony@ec762483-ff6d-05da-a07a-a48fb63a330f>
Date: Thu, 28 Oct 2010 19:42:39 +0000
Subject: gen  ps

git-svn-id: https://ws10smt.googlecode.com/svn/trunk@698 ec762483-ff6d-05da-a07a-a48fb63a330f
---
 word-aligner/support/generate_per_sentence_grammars.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'word-aligner/support/generate_per_sentence_grammars.pl')

diff --git a/word-aligner/support/generate_per_sentence_grammars.pl b/word-aligner/support/generate_per_sentence_grammars.pl
index 730035d8..80243419 100755
--- a/word-aligner/support/generate_per_sentence_grammars.pl
+++ b/word-aligner/support/generate_per_sentence_grammars.pl
@@ -55,6 +55,7 @@ my $id = 0;
 open O, ">ps.grammar" or die;
 binmode(O,":utf8");
 while(<C>) {
+  chomp;
   my ($f,$e) = split / \|\|\| /;
   my @fwords = split /\s+/, $f;
   my $tot = 0;
@@ -73,7 +74,8 @@ while(<C>) {
     $used{$f} = 1;
   }
   print O "###EOS###\n";
-  print STDERR "id=$id POS=$fpos\n";
+  print STDERR "<seg id=\"$id\" grammar=\"\@$fpos\"> $_ </seg>\n";
+  #print STDERR "id=$id POS=$fpos\n";
   $id++;
   last if $id == 10;
 }
-- 
cgit v1.2.3