>perl -we"map { chomp; lc } <>;"
a
b
c
^Z