Re^4: scandns.pl

[jdporter]

I don't know, I think maybe you've made other changes to the code? Because when I run it with that exact argument — 209.197.123.153/29 — I get a result indicating that the IP address is valid.

[taint]

Greetings, jdporter.

I just now copied the source from this page. Then only removed the
($x==4)
from the offending line, and replaced it with your proposed solution
($x=0)
then ran it;


% ./scandns.pl 209.197.123.153/29
209.197.123.153 is an invalid address
%

I have no idea. The only possible difference(s) I can imagine, would be

   * differing OS's
   * differing versions of: IO::Socket or Net::Netmask
   * differing versions of Perl itself


Sincerely confused.

Best wishes.

--Chris

[jdporter]

Please read my original reply again. My suggested fix was not to replace
($x==4)
with
($x==0)

but to replace
my $x;
with
my $x=0;

All I can say is, if this is the accuracy with which you approach programming, I would never hire you.

[taint]

In all fairness to both of us;

Your last statement:

Please read my original reply again. My suggested fix was not to repla
+ce
($x==4)
with
($x==0)

but to replace
my $x;
with
my $x=0;

I think if you carefully go back over all this, you'll see neither of us suggested:

($x==4)
with
($x==0)

I'm going to take this opportunity to suggest that we'd both do well to drop this.

It's all beginning to seem pretty silly. Don't you think? :)

Best wishes, jdporter.

--Chris