use Term::ReadLine;
  $term = new Term::ReadLine 'ProgramName';
  $_ = $term->readline('prompt>','<please enter your name here>');