Shell Programming and Scripting

I am working on a perl script that is used to update a list of hosts to a certain file but I am having an issue when I try to perform a check to make sure the user enters valid information. The following is what I have currently written for the script:

Code:

IPINPUT:
print "Enter IP Address: ";
chomp($ipaddress=<STDIN>);

if($ipaddress !~ /\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}/) {
        print "Please enter a valid IP Address\n";
        goto IPINPUT;
}

This works for making sure the variable is in the proper format but I am having issues with making sure the user doesn't enter in anything over 255 for each of the spots. Any advise in editing this part of the code or adding another line that would perform this would be great. Thanks in advance for the help.

This is a very generic thing which you can get data by googling.

Basically, you have to search for

Code:

validate IP address in perl

, or regex and something like that..


Update: Ok, here is the link finally: http://www.perlmonks.org/?node_id=615683

Wow, thanks for the help. My searches failed me because I was making this more complex then it had to be. Sorry to waste your time.