Acme-CPANAuthors-MBTI

 view release on metacpan or  search on metacpan

README  view on Meta::CPAN

Acme::CPANAuthors::MBTI

Minimal release atm.

Send bug reports ( or preferably patches ) if you want inclusion.

Will generate extra .pm files on demand as soon as we have members (
Trivial Effort )

Recommended quiz for people who have no idea and just want to play
along: <http://www.25quiz.com/>

Its not guaranteed to be accurate, but that doesn't matter.

Its a generalisation tool.

Just because the generalisation holds that averages of demographic
X[0..50] is "Y", that does not mean you can take X[1] and assert Y.

However, knowing X[1] is between X[0] and X[50] you can conjecture their
odds at being relative to the demographic average Y.

inc/expand_author_list.pm  view on Meta::CPAN

  my $plugin_version = $config{plugin_version} // $plugin_name->VERSION;

  my @lines;
  for my $author ( @{ $config{data} } ) {
    my $name = encode_entities( $author->{name} );
    my $title = "$author->{id} ($name), $author->{dists} distribution" . ( $author->{dists} != 1 ? 's' : '' );
    push @lines,
        qq{<a href="http://metacpan.org/author/$author->{id}">}
      . q{<span>}
      . q{<img style="margin: 0 5px 5px 0;" width="80" height="80" }
      . qq{src="$author->{avatar}" alt="$author->{id}" title="$title" />}
      . q{</span>} . q{</a>};
  }
  my $content = join( "<!--\n-->", @lines );

  return <<"EOF";
<div style="text-align:center;padding:0px!important;overflow-y:hidden;
margin-left: auto; margin-right: auto; max-width: 430px">
<!-- Data inserted by inc/expand_author_list#authors_to_avatars
 by $plugin_name $plugin_version -->
$content

lib/Acme/CPANAuthors/MBTI.pm  view on Meta::CPAN

version 0.001002

=head1 DESCRIPTION

Minimal release atm.

Send bug reports ( or preferably patches ) if you want inclusion.

Will generate extra .pm files on demand as soon as we have members ( Trivial Effort )

Recommended quiz for people who have no idea and just want to play along: L<http://www.25quiz.com/>

Its not guaranteed to be accurate, but that doesn't matter.

Its a generalisation tool.

Just because the generalisation holds that averages of demographic X[0..50] is "Y",
that does not mean you can take X[1] and assert Y.

However, knowing X[1] is between X[0] and X[50] you can conjecture their odds
at being relative to the demographic average Y.

lib/Acme/CPANAuthors/MBTI/INTP.pm  view on Meta::CPAN

  my $scalar = Acme::CPANAuthors::MBTI::INTP->category;

=head2 avatar_url

  my $url = Acme::CPANAuthors::MBTI::INTP->avatar_url('KENTNL');

=for html <div style="text-align:center;padding:0px!important;overflow-y:hidden;
margin-left: auto; margin-right: auto; max-width: 430px">
<!-- Data inserted by inc/expand_author_list#authors_to_avatars
 by Dist::Zilla::Plugin::MungeFile::WithDataSection 0.009 -->
<a href="http://metacpan.org/author/KENTNL"><span><img style="margin: 0 5px 5px 0;" width="80" height="80" src="https://secure.gravatar.com/avatar/4b96677ae9ecbe76b8c33ead244f7407?s=80&d=http%3A%2F%2Fwww.gravatar.com%2Favatar%2F4b96677ae9ecbe76b8c33e...
</div>

For more details see L<< C<Acme::CPANAuthors::MBTI>|Acme::CPANAuthors::MBTI >>.

=over 4

=item * L<< C<INTP> on personalitypage.com|http://personalitypage.com/INTP.html >>

=item * L<< C<INTP> on typelogic.com|http://typelogic.com/intp.html >>