view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

    - Improved the eg/q_and_a program.

0.0108 2020-03-21 23:45:08
    - Improve documentation.
    - Add the eg/q_and_a program to illustrate how this module might be used.

0.0107 2020-03-21 21:26:22
    - Improve documentation.

0.0106 2020-02-14 16:04:06
    - Remove accidental eg file.

0.0105 2020-02-14 15:49:34
    - Enhanced the eg/permutations code.

0.0104 2019-05-26 12:38:01
    - Use object accessors, not variables of accessors.
    - Math::BigRat->numify the returned ->score.
    - Add an example program to compute all possible scores.

0.0103 2019-03-31 21:02:46

eg/q_and_a  view on Meta::CPAN

use Term::Choose;
use Term::Clear ();

# https://www.eharmony.com/dating-advice/first-dates/15-great-first-date-questions/
my $questions = [
    { i => 1,
      q => 'Who are the most important people in your life?',
      a => ['parents', 'kids', 'friends'] },
    { i => 2,
      q => 'What makes you laugh?',
      a => ['jokes', 'comedies', 'pranks', 'accidents'] },
    { i => 3,
      q => 'Where is "home"?',
      a => ['here', 'across the country', 'in another country'] },
    { i => 4,
      q => 'Do you read reviews, or just go with your gut?',
      a => ['reviews', 'gut'] },
    { i => 5,
      q => "Do you have a dream you're pursuing?",
      a => ['yes', 'maybe', 'no'] },
    { i => 6,