Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Need help making the change to OO

by slackert (Novice)
on Jun 27, 2012 at 16:07 UTC ( [id://978711]=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    %sites = {
      site1 => [ '192.168.1.0/24', '10.10.10.0/24', '4.5.6.7/255.255.255.1
    +92'],
      site2 => [ '1.2.3.4/255.255.255.240', '10.1.1.1/255.255.255.252']
      ...
      };
    
  2. or download this
    %sites = (
      site1 => { 
    ...
        },
        ...
        );
    
  3. or download this
      $sites{'site1'}{'ipinfo'} = Net::CIDR::Lite->new;
    
  4. or download this
      $cidr = Net::CIDR::Lite->new;
      $sites{'site1'}{'ipinfo'} = $cidr->add_cidr('192.168.1.0/24');
    

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://978711]
Front-paged by stevieb
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others meditating upon the Monastery: (4)
As of 2024-04-19 03:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found