(Also emailed as requested)

It's not very happy on a redhat 9 box:

perl readkeyTest.pl
Foo
   Foo
      Foo
         Foo
            Foo
               Foo
                  Foo
                     Foo
                        Foo
                           Foo
Terminated
~/xml mike@tux6202
$ qqqqqqq
~/xml
$ perl -v

This is perl, v5.8.0 built for i386-linux-thread-multi
(with 1 registered patch, see perl -V for more detail)

Copyright 1987-2002, Larry Wall

...
~/xml
$ uname -a
Linux tuxXXXX 2.4.20-18.9smp #1 SMP Thu May 29 06:55:05 EDT 2003 i686 
+i686 i386 GNU/Linux
[download]

It DOES, however, work fine on a Redhat 7.x box with perl 5.6.1, with uname info:

 Linux tuxYYY 2.4.18-26.7.xsmp #1 SMP Mon Feb 24 09:37:16 EST 2003 i68
+6 unknown
[download]

--
Mike