More survey fixes.

diff --git a/mbd/mbd.pl b/mbd/mbd.pl
index 6a7b767ca184053cec8f58ae0cecebc1855957ce..5be1ca0e22232243f35b53a18da503aa9a1017f8 100644 (file)
--- a/mbd/mbd.pl
+++ b/mbd/mbd.pl
@@ -49,7 +49,7 @@ sub cache_cidrrange {
 
 open LOG, ">>", "mbd.log";
 
-my @ports = ( mbd::find_all_ports() , $Config::survey_port_low, $Config::survey_port_high );
+my @ports = ( mbd::find_all_ports() , $Config::survey_port_low .. $Config::survey_port_high );
 
 # Open a socket for each port
 my @socks = ();

diff --git a/mbd/survey.pl b/mbd/survey.pl
index 01b7b723ae3424f97d81e2f0e73e0604f061a344..a948180ab06803e53ff1ce1078ab3e9faffe5385 100644 (file)
--- a/mbd/survey.pl
+++ b/mbd/survey.pl
@@ -2,7 +2,7 @@ package Config;
 
 our $survey_ip = "87.76.254.2";
 our $survey_port_low = 60100;
-our $survey_port_high = 60600;
+our $survey_port_high = 60200;
 our $survey_freq = 60.0;
 our $survey_time = 10.0;