From 6de8f58cd13813bf33af4903bf386439683c0fd6 Mon Sep 17 00:00:00 2001 From: Chris Dyer Date: Mon, 31 Oct 2011 14:03:22 -0400 Subject: lbfgs + time-series minibatch optimization --- word-aligner/ortho-norm/mg.pl | 13 +++++++++++++ word-aligner/ortho-norm/rw.pl | 13 +++++++++++++ 2 files changed, 26 insertions(+) create mode 100755 word-aligner/ortho-norm/mg.pl create mode 100755 word-aligner/ortho-norm/rw.pl (limited to 'word-aligner/ortho-norm') diff --git a/word-aligner/ortho-norm/mg.pl b/word-aligner/ortho-norm/mg.pl new file mode 100755 index 00000000..4cb0e8e7 --- /dev/null +++ b/word-aligner/ortho-norm/mg.pl @@ -0,0 +1,13 @@ +#!/usr/bin/perl -w +use strict; +use utf8; + +binmode(STDIN, ":utf8"); +binmode(STDOUT, ":utf8"); + +while() { + $_ = lc $_; + s/([a-z])'( |$)/$1$2/g; + print; +} + diff --git a/word-aligner/ortho-norm/rw.pl b/word-aligner/ortho-norm/rw.pl new file mode 100755 index 00000000..4cb0e8e7 --- /dev/null +++ b/word-aligner/ortho-norm/rw.pl @@ -0,0 +1,13 @@ +#!/usr/bin/perl -w +use strict; +use utf8; + +binmode(STDIN, ":utf8"); +binmode(STDOUT, ":utf8"); + +while() { + $_ = lc $_; + s/([a-z])'( |$)/$1$2/g; + print; +} + -- cgit v1.2.3