Ask
view release on metacpan or search on metacpan
articles/ask-introduction.pod view on Meta::CPAN
say "Adding $_" for @answers;
Or if you just wish them to choose a single option from a list:
use Ask qw( single_choice );
my $existance = single_choice(
"To be, or not to be; that is the question.",
choices => [
[ be => "Be" ],
[ not_be => "Don't be" ],
],
);
Ask also has functions for file selection, text entry (including hidden
text - passwords) and displaying information, warnings and errors.
=head2 I object!
If you object to using the functional interface, you can get an object
using the C<< Ask->detect >> method and call C<question>,
( run in 1.033 second using v1.01-cache-2.11-cpan-cc502c75498 )