MyWackoSite: dslphp

#!/usr/local/bin/php
<?php
$class_b = "10.10";
$sub = 0;
$subnets = 256;
$plithos = 256;
$start_ip = 0;
$name = "dnsname";
$name_start = 1;
 
for ( $subnet = 0 ; $subnet < $subnets ; $subnet++, $sub++ ) {
  for ( $ip = $start_ip ; $ip < $plithos ; $ip++, $name_start++ ) {
        print $name."-";
                if ( $name_start < 1000) { print "0"; }
                if ( $name_start < 100) { print "0"; }
                if ( $name_start < 10) { print "0"; }
        print $name_start."\tIN\tA\t".$class_b.".".$sub.".".$ip."\n";
  }
}
?>