Mac Forum / Programming / Perl / February 2006

Doing an early problem (reading, reversing and printing a list of
strings read from input) in the Llama Book, 4th Ed., I wrote:

   #!/usr/bin/env perl
   # [comments omitted]
   print reverse <>;

This worked with a separately created input file:

   drj2:learningperl4 jonathan$ cat someInput.txt
   1
   2

   3
   drj2:learningperl4 jonathan$ p052e1.pl someInput.txt
   3

   2
   1

but it didn't work quite that way when I used standard input,
terminated with control-D:

   drj2:learningperl4 jonathan$ p052e1.pl
   1
   2

   3
   3D

   2
   1

Is this supposed to happen?  --MacOS X 10.3.9, perl "v5.8.1-RC3 built
for darwin-thread-multi-2level (with 1 registered patch, see perl -V
for more detail)"

tia,

Jonathan