Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re: Net IP

by shmem (Canon)
on May 28, 2013 at 16:27 UTC ( #1035642=note: print w/ replies, xml ) Need Help??


in reply to Net IP

I need to write a subnet mask calculator with perl. The extension Net::IP is really powerful.

Well, you could use that module. First thing to do is read its documentation, and off you go. Come back with some code to discuss.

Alternatively I just happen to have a calculator in my toolbox for calculating network, netmask and broadcast out of an IPv4 address in CIDR notation which could be worth being studied by you:

#!/usr/bin/perl # file cidr $m=pack B32,pop=~'/'x$'; printf"$` network %vd broadcast %vd netmask %vd\n",($z=eval$`)&$m,$z|~ +$m,$m; __END__ Example: cidr 209.197.123.153/27 209.197.123.153 network 209.197.123.128 broadcast 209.197.123.159 netm +ask 255.255.255.224
Consult the perl documentation for its various operators, perl special variables and internal functions.


Comment on Re: Net IP
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (6)
As of 2015-07-04 19:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (60 votes), past polls