-
- my $gw = "81.162.$majorsubnet." . ($minorsubnet + 1);
- my $rangestart = "81.162.$majorsubnet." . ($minorsubnet + 10);
- my $rangeend = "81.162.$majorsubnet." . ($minorsubnet + $numpc - 2);
+
+ # FIXME: Should use Net::CIDR
+ my $gw = "87.76.$majorsubnet." . ($minorsubnet + 1);
+ my $rangestart = "87.76.$majorsubnet." . ($minorsubnet + 10);
+ my $rangeend = "87.76.$majorsubnet." . ($minorsubnet + $numpc - 2);