lowercase.perl - nlp_scripts - Mirror of https://github.com/pks/nlp_scripts.git

summary refs log tree commit diff

path: root/lowercase.perl

blob: c30e029b96e223accc0008e2e4f60e67d18df3fe (plain)

#!/usr/bin/perl -w

use strict;

binmode(STDIN, ":utf8");
binmode(STDOUT, ":utf8");

while(<STDIN>) {
  print lc($_);
}