$ perl -le '$_="135.168.995.925"; print "Oops" if /135\.168\.[1-9][0-9][0-5]?\.[0-9][0-2]?[0-5]?/' Oops