Term::Visual is great, but it probably doesn't work with ActivePerl. Not only does it use Curses, but it attempts to select() on STDIN. Four-argument select() only works on sockets in ActivePerl.

You may get more mileage out of Cygwin, however. I have heard it can select() on things other than sockets.

-- Rocco Caputo - http://poe.perl.org/