From 3ad48471cdaec8059be4945606d97c019f2e4ce0 Mon Sep 17 00:00:00 2001 From: William Heimbigner Date: Fri, 25 Dec 2015 21:52:37 +0400 Subject: General code cleanup (removing unused functions / old commented out code / etc.) --- lib/ASM/Classes.pm | 2 -- 1 file changed, 2 deletions(-) (limited to 'lib/ASM/Classes.pm') diff --git a/lib/ASM/Classes.pm b/lib/ASM/Classes.pm index 325b71d..2fae035 100644 --- a/lib/ASM/Classes.pm +++ b/lib/ASM/Classes.pm @@ -5,7 +5,6 @@ use warnings; use Text::LevenshteinXS qw(distance); use Data::Dumper; use Regexp::Wildcards; -use Carp qw(cluck); my %sf = (); @@ -193,7 +192,6 @@ sub dnsbl # return 0; if (defined $rev) { ASM::Util->dprint("Querying $rev$chk->{content}", "dnsbl"); - #cluck "Calling gethostbyname in dnsbl"; my $iaddr = gethostbyname( "$rev$chk->{content}" ); my @dnsbl = unpack( 'C4', $iaddr ) if defined $iaddr; my $strip; -- cgit v1.2.3