You can have a look at the Curses::UI module on CPAN. It has most of the hard work already done for you.