Created my first Goodie

master
isleofmax 2014-12-24 19:33:23 +00:00
parent 01ee1c15cd
commit 9b71eaa1e3
2 changed files with 46 additions and 0 deletions

View File

@ -0,0 +1,27 @@
package DDG::Goodie::IsAwesome::isleofmax;
# ABSTRACT: isleofmax's first Goodie
use DDG::Goodie;
zci answer_type => "is_awesome_isleofmax";
zci is_cached => 1;
name "IsAwesome isleofmax";
description "My first Goodie, it let's the world know that isleofmax is awesome";
primary_example_queries "duckduckhack isleofmax";
category "special";
topics "special_interest", "geek";
code_url "https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/lib/DDG/Goodie/IsAwesome/isleofmax.pm";
attribution github => ["https://github.com/isleofmax", "isleofmax"];
code_url "https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/lib/DDG/Goodie/IsAwesome/isleofmax.pm";
attribution github => ["GitHubAccount", "Friendly Name"],
twitter => "twitterhandle";
triggers start => "duckduckhack isleofmax";
handle remainder => sub {
return if $_;
return "isleofmax is awesome and has successfully completed the DuckDuckHack Goodie tutorial!";
};
1;

19
t/IsAwesome/isleofmax.t Normal file
View File

@ -0,0 +1,19 @@
#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
use DDG::Test::Goodie;
zci answer_type => "is_awesome_isleofmax";
zci is_cached => 1;
ddg_goodie_test(
[qw(
DDG::Goodie::IsAwesome::isleofmax
)],
"duckduckhack isleofmax" => test_zci('isleofmax is awesome and has successfully completed the DuckDuckHack Goodie tutorial!'),
'duckduckhack isleofmax is awesome' => undef,
);
done_testing;