Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: Challenge Problem: Merging Network Addresses

by gbarr (Monk)
on Oct 13, 2001 at 03:17 UTC ( [id://118595]=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use Socket;

...
  my $bits = 32 - ($block =~ tr/#/0/);
  print inet_ntoa(pack("B*", $block)),"/$bits\n";
}
  2. or download this
    --- nm3b.out    Thu Oct 11 21:54:06 2001
+++ nm3b.xx     Sat Oct 13 00:08:51 2001
...
+5.4.3.0/31
 6.6.6.0/27
 6.6.7.0/26
  3. or download this
    101.33.45.27/30
101.33.34.0/24
  4. or download this
    use Socket;

...
  my $bits = 32 - ($block =~ tr/#/0/);
  print inet_ntoa(pack("B*", $block)),"/$bits\n";
}

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://118595]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others pondering the Monastery: (6)
As of 2024-04-19 15:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found