Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re^12: scandns.pl

by jdporter (Paladin)
on Nov 15, 2013 at 22:23 UTC ( [id://1062808]=note: print w/replies, xml ) Need Help??


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

Well, I don't know what to tell you, man. I took your code and re-fixed it by doing both

  • s/ my $x; / my $x=0; /
  • s/ return($x); / return($x==4); /
and now it works correctly, in that it reports both:
  • 209.197.123.153/29 is valid
  • 209.197.123.666/29 is invalid
Same results as the code I was using before.

Replies are listed 'Best First'.
Re^13: scandns.pl
by taint (Chaplain) on Nov 15, 2013 at 22:38 UTC
    LOL

    If I'm following you rightly; nothings changed. Your solution works for you, and mine, for me.

    Oh well. Something for another day. I've got too many other, more important things to deal with ATM.

    Thanks for taking the time to report your findings.

    --Chris

    #!/usr/bin/perl -Tw
    use Perl::Always or die;
    my $perl_version = (5.12.5);
    print $perl_version;

      You can't say your version works unless you believe 209.197.123.666/29 is a valid IP address.

        ???

        When I feed it the number you posted into it. It throws an error.
        What did it do when you did it?

        --Chris

        #!/usr/bin/perl -Tw
        use Perl::Always or die;
        my $perl_version = (5.12.5);
        print $perl_version;

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1062808]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others sharing their wisdom with the Monastery: (11)
As of 2024-03-28 09:37 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found