On Friday 29 February 2008 13:28:45 silvio wrote:
> Thanks, I'll study and try.
try this (at least it worked some time ago):
#!/usr/bin/perl -w
use strict;
use warnings;
use EBox;
use EBox::Global;
EBox::init();
my $dhcpModule = EBox::Global->modInstance('dhcp');
# parses a file: host,ip
open(my $FD,"dhcpd.conf");
while(my $line = <$FD>) {
chomp($line);
#my ($host,$ip) = split(',',$line);
$dhcpModule->addHostname($iface, $mac, $ip, $name);
}
close($FD);
1;
_______________________________________________
Ebox-user mailing list
[email protected]
https://lists.warp.es/mailman/listinfo/ebox-user
