Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re^2: Generate Random IP Addresses

by Anonymous Monk
on Mar 15, 2008 at 15:27 UTC ( [id://674362]=note: print w/replies, xml ) Need Help??


in reply to Re: Generate Random IP Addresses
in thread Generate Random IP Addresses

Im looking to generate a list of ips starting from something like 71.100.100.180 or something like that. need help doing this. I need to ban a whole city from something lol. :-P I think this is what the monkey guy might be trying to do as well.

Replies are listed 'Best First'.
Re^3: Generate Random IP Addresses
by BrowserUk (Patriarch) on Mar 15, 2008 at 16:04 UTC

    Various ways using various mysteriously named functions from various mysteriously named packages, but it's easy enough with pure perl:

    ## Subs to convert dotted-quads to integers and vice versa sub dq2n{ unpack 'N', pack 'C4', split '\.', $_[ 0 ] };; sub n2dq{ join '.', unpack 'C4', pack 'N', $_[ 0 ] };; $start = dq2n( '71.100.100.180' );; print n2dq( $_ ) for $start .. $start + 100;; 71.100.100.180 71.100.100.181 71.100.100.182 ... 71.100.100.254 71.100.100.255 71.100.101.0 71.100.101.1 71.100.101.2 ... 71.100.101.22 71.100.101.23 71.100.101.24

    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others avoiding work at the Monastery: (4)
As of 2024-04-20 01:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found