$range =~ s/^\s*// && s/\s*$//;
if ($range =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/)
{
   # ip ok
}