in reply to prompt for data

Try with Perl FAQ perldoc -q keyboard; if you need something more powerful, use Term::Readline.

Ciao, Valerio