G'day Pazitiff,

It sounds like Term::ReadKey will do what you want.

[You originally posted your question in PerlMonks Discussion. I've moved it to Seekers of Perl Wisdom. At the top of each section you'll find a short description of what the section is for. For future reference, please check you are posting in the correct place.]