Skip to content

Commit

Permalink
updated Readme to link to tutorial
Browse files Browse the repository at this point in the history
  • Loading branch information
Gabriel Weinberg committed Mar 17, 2012
1 parent 60d9ec9 commit 56ca869
Showing 1 changed file with 6 additions and 203 deletions.
209 changes: 6 additions & 203 deletions README.md
View file
@@ -1,11 +1,9 @@
Goodies Zero-click Info Plugins
DuckDuckGo Goodie Plugins
=================================

See [the contribution page](https://github.com/duckduckgo/duckduckgo/wiki) for a general overview on contributing to DuckDuckGo.
See [the tutorial](https://github.com/duckduckgo/duckduckgo/wiki/Open-Source-Plugin-Tutorial) for documentation (including step by step instructions).

This repository is for contributing Perl-based Zero-click Info plugins. Each goodie plugin reacts to a set of queries and produces instant answers at the top of search results, e.g. calculations or throwing dice.

We maintain a list of requested goodie plugins, which are colored yellow on [the Trello board](https://trello.com/board/duckduckgo-open-source-plugins/4f08e96d947729b526070890), but whatever you want to attempt is welcome!
We maintain a list of [requested goodie plugins](https://duckduckgo.uservoice.com/forums/5168-plugins/category/41841-goodies), but whatever you want to attempt is welcome!


Contributing
Expand All @@ -16,205 +14,10 @@ First off, thank you!

### Process

1) Develop your plugin using the Structure below in either a fork or a branch (if a collaborator).
1) Hack.

2) Test your plugin via Testing procedure below.
2) Test.

3) Submit a pull request.

Feel free to [ask questions](http://webchat.freenode.net/?channels=duckduckgo)!



### Structure


Each goodie has its own directory. Some of the directories are in use on the live system, and some are still in development.

Each directory has a structure like this:

```txt
# Perl file that can be directly inserted into the live system.
# This file is included, so does not need a shebang
# or a use warnings/strict line.
goodie.pl
# List of test queries, one per line.
queries.txt
# OPTIONAL: helper files as needed
goodie.txt
goodie.html
```

### Testing

**Please, please test your goodie via the goodie-test.pl script in the top level directory before making a pull request. We developed this script to make sure integration goes smoothly.**

```
# Test a particular query.
# Replace goodie with the name of your directory.
# Replace query with your query.
./goodie-test.pl goodie query
# Test the queries in queries.txt
# Replace goodie with the name of your directory.
./goodie-test.pl -t goodie
```


### goodie.pl
Within the goodie.pl file, a few things are happening, and here is an overview that references live examples, which you can review:


1) There are some variables that are used in the system that operate outside the goodie, but which the goodie uses. Every goodie will use:

```perl

# This is the instant answer that gets printed out.
my $answer_results = '';

# This is a name (lowercase, no spaces) that gets
# passed through to the API that should be defined
# if $answer_results is set.
my $answer_type = '';

# This is defined external to the goodie and tells you
# whether there is other Zero-click Info, and if so,
# what type is it (C for category page, etc.).
my $type = '';
```

In addition, you may want to use:

```perl

# This is used to indicate whether the results get cached or not.
# If the goodie is supposed to provide some kind of random output
# that changes per page view, then you will want to set this to 0.
my $is_memcached = 1;

```

Finally, you will want to use a form of the query:

```perl

# This is the most common form in use.
# It is a lower case version of the query
# with an initial ! and ending ? removed.
my $q_check_lc = 'example query';

# This is the raw query.
my $q = 'Example query';

# This is a lower case version of the query
# with sanitized spaces and special characters removed.
my $q_internal = 'example query';
```


2) The goodie needs to know when to be called. This involves some kind of conditional statement that first involves the $type variable.

```perl

# If there is no Zero-click.
if (!$type) {

}


# If there is no other goodie.
# Will kill other Zero-click Info, e.g. Wikipedia.
if ($type ne 'E') {

}

```

Secondly you want to segment the query space to queries related to that goodie. [guid](https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/guid/goodie.pl) uses a hash to do so.

```perl

# Uses a hash to segment the query space.
my %guid = (
'guid' => 0,
'uuid' => 1,
'globally unique identifier' => 0,
'universally unique identifier' => 1,
'rfc 4122' => 0,
);

if ($type ne 'E' && exists $guid{$q_check_lc}) {

}
```

[binary](https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/binary/goodie.pl) uses a regular expression.

```perl

if (!$type && $q_check_lc =~ m/^binary (.*)$/i) {

}
```

For regular expressions, we need to watch out for false positives and speed. You can do this easily by adding a lot of queries to queries.txt


3) Once inside the conditional, the goodie formulates the answer. This could vary slightly depending on input, but results in setting the $answer_results variable. Here's what [abc](https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/abc/goodie.pl) looks like.

```perl
if (!$type && $q_check =~ m/^\!?\s*[A-Za-z]+(\s+or\s+[A-Za-z]+)+\s*$/ ) {
my @choices = split(/\s+or\s+/, $q_check);
my $choice = int(rand(@choices));

$answer_results = $choices[$choice];
$answer_results .= ' (random)';
$answer_type = 'rand';
}
```


### Notes

And here are some other things to keep in mind:

1) If you need a helper file, name it goodie.txt or goodie.html as needed. If you need to read in that file to be used over and over again, do it outside the conditional. For example [passphrase](https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/passphrase/goodie.pl) reads in a list at the top.

```perl
my %passphrase = ();
open(IN, '<passphrase/goodie.txt');
while (my $line = <IN>) {
chomp($line);
my @res = split(/ /, $line);
$passphrase{$res[0]} = $res[1];

}
close(IN);
```

Whereas if you need to read in a file for output, do it inside the conditional. For example, [public_dns](https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/public_dns/goodie.pl) reads in a list inside.

```perl
open(IN,"<public_dns/goodie.html");
while (my $line = <IN>) {
$answer_results .= $line;
}
close(IN);
```


2) If it is possible that the conditional gets called, but $answer_results still may not be set, then wrap $answer_type (and possibly other variables) in a separate conditional like in [private_network](https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/private_network/goodie.pl).

```perl
if ($answer_results) {
$answer_type = 'network';
$type = 'E';
}
```

3) Goodies should only display results when they are better than algorithmic results.

4) It generally helps to give a bit of context around the answer_results, e.g. '(random password)' after a random password or 'Answer:' before.

Feel free to ask questions at [#duckduckgo on Freenode] (http://webchat.freenode.net/?channels=duckduckgo)!

0 comments on commit 56ca869

Please sign in to comment.