{
    #------------------------------------------------------------
    # Static dhcp Entries
    #------------------------------------------------------------
    use esmith::HostsDB;
    my $hdb = esmith::HostsDB->open_ro();

    foreach $host ($hdb->hosts)
    {
        my $InternalIP = $host->prop('InternalIP');
	next unless (defined($InternalIP) && ($InternalIP ne ''));

        my $MACAddress = $host->prop('MACAddress');
	next unless ( defined($MACAddress) && ($MACAddress ne ''));

        my $Filename = $host->prop('Filename');

   	$OUT .= "\n";
	$OUT .= "host " . $host->key . " \{\n";
	defined($Filename) and $OUT .= "    filename \"$Filename\";\n";
	$OUT .= "    hardware ethernet $MACAddress;\n";
	$OUT .= "    fixed-address $InternalIP;\n";
	$OUT .= "\}";
	$OUT .= "\n";
    }
    undef;	# We need a return value
}
