view release on metacpan or  search on metacpan

lib/Acme/rafl/Everywhere.pm  view on Meta::CPAN

  q{rafl is so everywhere, Internet Census 2012 found 1.3 billion active IP addresses and estimates that 1.1 billion of them are being used by rafl!},
  q{rafl is so everywhere, the next version of Debian is replacing /bin/cat with a shell alias for grep 'rafl'},
  q{rafl is so everywhere, the Da Vinci code is actually a Base64 Rot13 representation of rafl},
);

sub new {
    my $class = shift;
    my $self  = bless {@_}, $class;

    exists $self->{'facts'}
        or $self->{'facts'} = \@default_facts;

    return $self;
}

sub fact {
    my $self  = shift;
    my $facts = $self->{'facts'};
    return $facts->[ int rand scalar @{$facts} ];
}

1;

__END__

=pod

=head1 NAME

Acme::rafl::Everywhere - rafl is so everywhere, he has his own Acme module!

=head1 VERSION

version 0.011

=head1 SYNOPSIS

    use Acme::rafl::Everywhere;

    my $rafl = Acme::rafl::Everywhere->new;
    print $rafl->fact;

Or set your own facts

    my $rafl = Acme::rafl::Everywhere->new(
        facts => [@new_facts],
    );

=head1 DESCRIPTION

If you haven't already seen C<rafl> somewhere, you probably haven't been alive
for too long, because he really is everywhere.

L<Moose>, L<MooseX::Declare>, L<Catalyst>, L<Dist::Zilla>, L<signatures>,
L<KiokuDB>, L<Gtk2>, Perl core, MetaCPAN and GSoC are just I<some> of the
projects he's involved in.  

There is proof for at least one fact noted by this distribution, taken at
YAPC::EU 2012.

=for html <img src="http://cdn.memegenerator.net/instances/400x/28135704.jpg" />

=for html <a href="http://t.co/jcne0k4p"><img src="https://pbs.twimg.com/media/A1D_IQqCMAERsHA.jpg" /></a>

=head1 CONTRIBUTERS

We would like to thank the following people (in alphabetical order) for their
help in collecting these completely real facts about C<rafl>. This list would
not exist without the help of these tireless hard-working lead investigators:

=over 4

=item * Breno (garu) G. de Oliveira

=item * Damien Krotkine

=item * Toby Inkster

=item * Torsten (Getty) Raudssus

=item * Viacheslav (vti) Tykhanovskyi

=back

=head1 HELP ADD MORE FACTS

Please add more facts! We accept pull requests, patches, emails, IRC messages,
fortune cookie notes, sky writings, scribbled messages on public bathroom
stalls, inappropriate mid-meeting whispers, and more.

=head1 BUGS

This module cannot contain all the information about C<rafl>, but you're
more than welcome to add any new info.

=head1 THANKS

To C<rafl> for being everywhere. :)

=head1 SEE ALSO

http://piuparts.debian.org/squeeze/maintainer/r/rafl@debian.org.html

https://metacpan.org/author/FLORA

=head1 AUTHOR

Sawyer X <xsawyerx@cpan.org>

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Sawyer X.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut