remove 5.10.1 isms (//= etc)

[spider.git] / perl / console.pl

diff --git a/perl/console.pl b/perl/console.pl
index 13f2bfa1873ae9522068d427e217cc5e936c2a24..b71d8a684a2a8207a72e0112990a71251023d4c3 100755 (executable)
--- a/perl/console.pl
+++ b/perl/console.pl
@@ -50,8 +50,8 @@ use Console;
 # initialisation
 #
 
-$clusteraddr //= '127.0.0.1';
-$clusterport //= 27754;
+$clusteraddr ||= '127.0.0.1';
+$clusterport ||= 27754;
 
 $call = "";                     # the callsign being used
 $node = "";                     # the node callsign being used