From 8aed315c7cf204b40c86df944a77cc85271edb9a Mon Sep 17 00:00:00 2001
From: virus2500 <virus2500@me.com>
Date: Fri, 27 Dec 2013 15:05:02 +0100
Subject: [PATCH] removed unnecessary ipToRegex function
---
blocklist.pl | 14 ++------------
1 file changed, 2 insertions(+), 12 deletions(-)
diff --git a/blocklist.pl b/blocklist.pl
index c409541..3eadf1a 100755
--- a/blocklist.pl
+++ b/blocklist.pl
@@ -2,7 +2,7 @@
use strict; use warnings;
################################################################
###### Script to check Blocklist.de list. Block new IP ######
-###### and unblock old delete entrys ######
+###### and unblock deleted entrys ######
################################################################
## config ##
@@ -19,7 +19,7 @@ my $rm = "/bin/rm";
my $wget = "/usr/bin/wget";
## plain variables ##
-my($row, $Blocklist, $line, $check, $checkLine, $result, $output, $ipRegex, $ipToRegex);
+my($row, $Blocklist, $line, $check, $checkLine, $result, $output, $ipRegex);
my ($added, $removed, $skipped);
$added = $removed = $skipped = 0;
@@ -172,16 +172,6 @@ sub cleanup {
}
############### END cleanup ######################
-########## ipToRegex ##########
-## converts an ip to regex ##
-## e.g. 192.168.0.1 to ##
-## 192\.168\.0\.1 ##
-###############################
-sub ipToRegex {
- my ($ip) = @_;
- $ip =~ s/\./\\./g;
- return "$ip";
-}
######## END ipToRegex ########
############ isIpv4 #############
--
GitLab