in reply to Re^2: Infinite LOOP and reading from STDIN
in thread Infinite LOOP and reading from STDIN

The FAQ suggests Switch::Plain so maybe try that?

  • Comment on Re^3: Infinite LOOP and reading from STDIN (avoid "given")

In Section Seekers of Perl Wisdom