Help for this page
open(F,'C:\Temp\ipconfig.txt') || die "error($!)"; while(<F>) ... my $fk="$ff:255.255.255.0"; $block4 = new2 Net::Netmask($fk); print $block4->size();
my $ff="10.6.10.5"; my $fk="$ff:255.255.255.0"; $block4 = new2 Net::Netmask($fk); print $block4->size();