zeroclickinfo-goodies/lib/DDG/Goodie/PrivateNetwork.pm

30 lines
835 B
Perl
Raw Normal View History

package DDG::Goodie::PrivateNetwork;
# ABSTRACT: show non-Internet routable IP addresses.
use strict;
use DDG::Goodie;
triggers start => "private network", "private ip", "private networks", "private ips";
zci is_cached => 1;
2012-03-20 21:08:12 -07:00
zci answer_type => "private_network";
2012-11-06 15:33:29 -08:00
primary_example_queries 'private networks';
secondary_example_queries 'private ips';
description 'show private IP blocks';
name 'PrivateNetwork';
code_url 'https://github.com/duckduckgo/zeroclickinfo-goodies/blob/master/lib/DDG/Goodie/PrivateNetwork.pm';
2012-11-06 16:17:37 -08:00
category 'cheat_sheets';
2012-11-06 15:33:29 -08:00
topics 'sysadmin';
attribution twitter => ['crazedpsyc', 'Michael Smith'],
cpan => ['CRZEDPSYC', 'Michael Smith'];
2012-11-06 15:33:29 -08:00
2013-05-13 06:31:45 -07:00
my $text = scalar share('private_network.txt')->slurp,
my $html = scalar share('private_network.html')->slurp;
2012-03-18 16:09:03 -07:00
handle sub {
$text, html => $html
2012-03-18 16:09:03 -07:00
};
1;