Net::DNS::Match - Perl extension for testing domains against another list of
domains (similar to Net::Patricia but for FQDNs)
use Net::DNS::Match;
use Data::Dumper;
my $addr = 'img.yahoo.com';
my $obj = Net::DNS::Match->new();
$obj->add([
'yahoo.com',
'google.com',
'www.facebook.com',
]);
die Dumper($obj->match($addr));
This module was initially created to test a list of domains against a whitelist
(eg: the Alexa top 1000 list).
Wesley Young, <wes@barely3am.com>
Copyright (C) 2012 by Wesley Young
This library is free software; you can redistribute it and/or
modify it under the same terms as Perl itself, either Perl version 5.12.3
or, at your option, any later version of Perl 5 you may have available.