diff options
Diffstat (limited to 'word-aligner/extract_grammar.pl')
-rwxr-xr-x | word-aligner/extract_grammar.pl | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/word-aligner/extract_grammar.pl b/word-aligner/extract_grammar.pl deleted file mode 100755 index d7275ef5..00000000 --- a/word-aligner/extract_grammar.pl +++ /dev/null @@ -1,11 +0,0 @@ -#!/usr/bin/perl -w -use strict; - -my $key = shift @ARGV; -die "Usage: $0 KEY\n" unless defined $key; - -while(<>) { - my ($k, @rest) = split / \|\|\| /; - print join(' ||| ', @rest) if ($k eq $key); -} - |