Created my first Goodie

master
ashleyg 2015-01-04 21:13:12 +00:00
parent aa9ad38a5d
commit 5d84c004e6
2 changed files with 45 additions and 0 deletions

View File

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

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_ashleyglidden";
zci is_cached => 1;
ddg_goodie_test(
[qw(
DDG::Goodie::IsAwesome::ashleyglidden
)],
'duckduckhack ashleyglidden' => test_zci('ashleyglidden is awesome and has successfully completed the DuckDuckHack Goodie tutorial!'),
'duckduckhack ashleyglidden is awesome' => undef,
);
done_testing;