Acme-Affinity
view release on metacpan or search on metacpan
q => "Who's the most fascinating person you know?",
a => ['mom', 'dad', 'friend'] },
{ i => 19,
q => "What's the hardest thing you've ever done?",
a => ['say I love you', 'meet the in-laws'] },
{ i => 20,
q => "What's the scariest thing you've ever done?",
a => ['say I love you', 'meet the in-laws'] },
];
# Set you to a purposfully strict set of answers
my $you = [ map { [ $_->{a}[0], $_->{a}[0], 'mandatory' ] } sort { $a->{i} <=> $b->{i} } @$questions ];
my %answers = (); # Bucket for the indexed "me" answers
my $affinity = Acme::Affinity->new;
my @importance = sort { $affinity->importance->{$a} <=> $affinity->importance->{$b} } keys %{ $affinity->importance };
my $i = 0;
t/author-pod-spell.t view on Meta::CPAN
}
use strict;
use warnings;
use Test::More;
# generated by Dist::Zilla::Plugin::Test::PodSpelling 2.007005
use Test::Spelling 0.12;
use Pod::Wordlist;
set_spell_cmd('aspell list');
add_stopwords(<DATA>);
all_pod_files_spelling_ok( qw( bin lib ) );
__DATA__
Acme
Affinity
Boggs
Gene
gene
lib
themself
( run in 1.223 second using v1.01-cache-2.11-cpan-49f99fa48dc )