http://www.perlmonks.org?node_id=1062517


in reply to Re: scandns.pl
in thread scandns.pl

That's stupid. A better, simpler, less logic-assaulting change would be to address the warning message itself, by changing

my $x;
to
my $x=0;
More to the point, your "fix" completely blows the logic of the code, which attempts to implement the requirement that all four of the octets must be in the range 0..255. Your "fix" would say that an argument of 1.99999.99999.99999 is a valid IP address.

I reckon we are the only monastery ever to have a dungeon stuffed with 16,000 zombies.