# remove non-ip-address characters, trim, break into words to validate $IP_LINE =~ s/[^0-9.]+/ /g ; $IP_LINE =~ s/^ // ; $IP_LINE =~ s/ $// ; my @WORDS = split(/\s+/,$IP_LINE) ;