18 lines
361 B
Perl
18 lines
361 B
Perl
package DDG::Goodie::Rafl;
|
|
# ABSTRACT: rafl is so everywhere, there's a DuckDuckGo.com "!rafl" bang syntax
|
|
use DDG::Goodie;
|
|
|
|
use Acme::rafl::Everywhere;
|
|
|
|
attribution
|
|
web => 'http://stephen.scaffidi.net',
|
|
github => 'Hercynium';
|
|
|
|
triggers any => 'rafl';
|
|
|
|
handle remainder => sub {
|
|
return Acme::rafl::Everywhere->new->fact
|
|
};
|
|
|
|
1 && "rafl"; # everywhere
|