--- lib/PXElator/server.pm	2009/07/29 23:03:00	47
+++ lib/PXElator/server.pm	2009/08/03 08:52:32	118
@@ -1,9 +1,33 @@
 package server;
 
-our $ip = '172.16.10.1';
+use warnings;
+use strict;
+
+use Module::Refresh;
+
+our $ip      = '172.16.10.1';
+our $netmask = '255.255.255.0';
 
 our ( $ip_from, $ip_to ) = ( 10, 100 );
 
 our $base_dir = '/home/dpavlin/llin/pxelator';
 
+use config;
+
+our $debug;
+sub debug { $debug = config::shared('debug', @_) || 0 }
+
+my $timestamp_interval = 3;
+my $stderr_tell = 0;
+
+$SIG{ALRM} = sub {
+    if ( tell(STDERR) != $stderr_tell ) {
+        warn "\nTIMESTAMP: " . localtime() . "\n\n";
+        $stderr_tell = tell(STDERR);
+		Module::Refresh->refresh;
+    }
+    alarm $timestamp_interval;
+};
+alarm $timestamp_interval;
+
 warn "loaded";