use strict; use warnings; package Acme::rafl::Everywhere; { $Acme::rafl::Everywhere::VERSION = '0.007'; } # ABSTRACT: rafl is so everywhere, he has his own Acme module! my @default_facts = ( q{rafl is so everywhere, he's on both the vim and emacs mailing list, arguing for each!}, q{rafl is so everywhere, he's behind you right now!}, q{rafl is so everywhere, even Chuck Norris checks under his bed every night!}, q{rafl is so everywhere, Freddy Krueger is afraid of falling asleep!}, q{rafl is so everywhere, Schrodinger's cat's got nothing on him!}, q{rafl is so everywhere, he sent me postcards from the surface of the sun!}, q{rafl is so everywhere, when you want to abandon a module, rafl gets co-maint automatically!}, q{rafl is so everywhere, you can find Waldo simply by searching for anyone who isn't rafl!}, q{rafl is so everywhere, Jesus owes him a pull request on Github!}, q{rafl is so everywhere, he has the first commit of Javascript on Parrot!}, q{rafl is so everywhere, when you breathe, that's rafl you're breathing!}, q{rafl is so everywhere, he makes a cameo in the video from The Ring!}, q{rafl is so everywhere, he ar in yur Perl debuggr, pointing at yore crappy code!}, q{rafl is so everywhere, he is the default entry in your SSH authorized_keys file!}, q{rafl is so everywhere, he issued the first bug report for Perl, before it existed!}, q{rafl is so everywhere, he participated in the space olympics!}, q{rafl is so everywhere, he can visit all the YAPCs even if they are on the same day!}, q{rafl is so everywhere, every picture is actually photo-bombed by rafl!}, q{rafl is so everywhere, Git might be renamed to Girafl to clarify its distributed design!}, q{rafl is so everywhere, the post office asks him for directions!}, q{rafl is so everywhere, he has more foursquare checkins in Mars than the Curiosity hover!}, q{rafl is so everywhere, quantum teleportation papers cite him as main study source!}, q{rafl is so everywhere, he can patch your code even before you push it!}, q{rafl is so everywhere, he caused an integer overflow in every Airline's mileage system!}, q{rafl is so everywhere, there's a saved seat for him in every conference in the world!}, q{rafl is so everywhere, there's a DuckDuckGo.com "!rafl" bang syntax}, ); 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.007 =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 somewhere, you probably haven't been alive for too long, because he really is everywhere. L, L, L, L, L, L, L, Perl core, MetaCPAN and GSoC are just I 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 =for html =head1 CONTRIBUTERS We would like to thank the following people (in alphabetical order) for their help in collecting these completely real facts about C. 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, but you're more than welcome to add any new info. =head1 THANKS To C 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 =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2012 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