Subnet / Subnet Mask ---> IP calculation

[kielhd]

Hi NG,

I'm looking for a small script which would return all possible IPs
within a given Subnet and corresponding Subnet Mask.
ie: input: Subnet 10.152.186.0, Subnet Mask 255.255.255.192
output: 10.152.186.0, 10.152.186.1, 10.152.186.2 ... 10.152.186.63

Thanks!
Henning

 

[Anno Siegel]

Hi NG,

I'm looking for a small script which would return all possible IPs
within a given Subnet and corresponding Subnet Mask.
ie: input: Subnet 10.152.186.0, Subnet Mask 255.255.255.192
output: 10.152.186.0, 10.152.186.1, 10.152.186.2 ... 10.152.186.63

What have you tried so far?

We help people with their Perl programs, but we don't do contract work.
Find a newsgroup with "jobs" in the title for that.

Anno

 

[Brian McCauley]

I'm looking

When you say "I'm looking" can you explain what form this looking has
taken? Perhaps we could then advise you on how to look more
effectively.

There's a module to do exactly what you describe in the usual place
(see FAQ).

--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\

 

[John W. Krahn]

I'm looking for a small script which would return all possible IPs
within a given Subnet and corresponding Subnet Mask.
ie: input: Subnet 10.152.186.0, Subnet Mask 255.255.255.192
output: 10.152.186.0, 10.152.186.1, 10.152.186.2 ... 10.152.186.63

use Socket;
sub range {
my ( $sub, $mask ) = map unpack( 'N', inet_aton( $_ ) ), @_;
map inet_ntoa( pack( 'N', $sub | $_ ) ), $sub & ~$mask .. ~$mask;
}

print for range( '10.152.186.0', '255.255.255.192' );


John