NAME

Tie::DuckDuckGo - Access DuckDuckGo search results via variables

SYNOPSIS

use Tie::DuckDuckGo;

# tie a scalar
my $search;
tie $search => 'Tie::DuckDuckGo' => 'perl';

say $search->{url};
say $search->{title};
say $search->{snippet};

# tie an array
my @results;
tie @results => 'Tie::DuckDuckGo' => 'perl';

for (@results) {
  say $_->{url};
  say $_->{title};
  say $_->{snippet};
}

# tie a hash
my %results;
tie %results => 'Tie::DuckDuckGo';

my $result = $results{reddit};
say $_->{url} for @$result;

DESCRIPTION

I came across Darren Chamberlain's neat implementation of Tie::Google and though it would be fun to write a version for DuckDuckGo.

I haven't implemented all of the require methods for tie(). I plan to add those in a future release.

AUTHOR

Curtis Brandt <curtis@cpan.org>

COPYRIGHT

Copyright 2014- Curtis Brandt

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

Tie::Google