From d8b7a5fe01883818fe00d117b83852c6ea47747f Mon Sep 17 00:00:00 2001 From: Chris Dyer Date: Tue, 6 Nov 2012 00:02:38 -0500 Subject: add lowercase script --- corpus/lowercase.pl | 9 +++++++++ 1 file changed, 9 insertions(+) create mode 100755 corpus/lowercase.pl diff --git a/corpus/lowercase.pl b/corpus/lowercase.pl new file mode 100755 index 00000000..688e493b --- /dev/null +++ b/corpus/lowercase.pl @@ -0,0 +1,9 @@ +#!/usr/bin/perl -w +use strict; +binmode(STDIN,":utf8"); +binmode(STDOUT,":utf8"); +while(<>) { + $_ = lc $_; + print; +} + -- cgit v1.2.3