track new_clients using tie

diff --git a/lib/PXElator/server.pm b/lib/PXElator/server.pm
index 0a0455d..089851a 100644 (file)
--- a/lib/PXElator/server.pm
+++ b/lib/PXElator/server.pm
@@ -11,6 +11,7 @@ tie our $bcast,   'server::tie', 'bcast'     => '172.16.10.254';
 tie our $ip_from, 'server::tie', 'ip_from'   => 10;
 tie our $ip_to,   'server::tie', 'ip_to'     => 100;
 tie our $domain,  'server::tie', 'domain'    => 'pxelator.lan';
+tie our $new_clients, 'server::tie', 'new_clients' => $ip_to - $ip_from;
 
 warn "DEV $ip $bcast $netmask";