Tightened up the re description of an IP quad.

Fork: 0

tundra / abck

Browse code Tightened up the re description of an IP quad. master
1 parent 3bb65f7 commit f7c880ad5d80e4aa13b41260fff13b2cb2667675 tundra authored on 16 Jul 2001

Patch

Unified Split

Showing 1 changed file

                Ignore Space
               Show notes
              View
            
          
          4 ■■■■■
          abck
 DIG  = "/usr/bin/dig -t ptr -x "
LOG = "/var/log/messages"
OUT = "./ABUSERS"
 
VERSION = "$Id: abck,v 1.2 2001/07/16 20:22:20 tundra Exp $"
VERSION = "$Id: abck,v 1.3 2001/07/16 20:30:09 tundra Exp $"
 
####################
# Data Structures
####################
####################
 
# Regular Expression which describes a legit IP quad address
 
IPQuad   = r"^((\d{1,3}\.){3}(\d\d?\d?))$"
IPQuad   = r"(\d{1,3}\.){3}\d{1,3}$"
 
####################
# Function Definitions
####################
 DIG  = "/usr/bin/dig -t ptr -x "
 LOG = "/var/log/messages"
 OUT = "./ABUSERS"
+VERSION = "$Id: abck,v 1.2 2001/07/16 20:22:20 tundra Exp $"
+VERSION = "$Id: abck,v 1.3 2001/07/16 20:30:09 tundra Exp $"
 ####################
 # Data Structures
 ####################
 ####################
 # Regular Expression which describes a legit IP quad address
+IPQuad   = r"^((\d{1,3}\.){3}(\d\d?\d?))$"
+IPQuad   = r"(\d{1,3}\.){3}\d{1,3}$"
 ####################
 # Function Definitions
 ####################

Show line notes below