X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXVars.pm;h=b46d2e3e3c73984d57cbd9499323ad804208d5eb;hb=82f98b9ed11d362b2bf18f3371bb60ff02f024db;hp=5baf3a6790bfd98d401db06edbc04dc3a470bc76;hpb=07ea293f3919d2da76220b5fbc55b734008ed44c;p=spider.git diff --git a/perl/DXVars.pm b/perl/DXVars.pm index 5baf3a67..b46d2e3e 100644 --- a/perl/DXVars.pm +++ b/perl/DXVars.pm @@ -13,10 +13,11 @@ require Exporter; @ISA = qw(Exporter); @EXPORT_OK = qw($mycall $myname $myalias $mylatitude $mylongtitude $mylocator - $myqth $myemail $myprot + $myqth $myemail $myprot_version $clusterport $clusteraddr $debugfn - $def_hopcount $root $data $system $cmd + $def_hopcount $data $system $cmd $userfn $motd $local_cmd $mybbsaddr + $pc50_interval, $user_interval ); @@ -56,20 +57,14 @@ $clusterport = 27754; # cluster debug file $debugfn = "/tmp/debug_cluster"; -# the version of DX cluster (tm) software I am masquerading as -$myprot = "5447"; - # your favorite way to say 'Yes' $yes = 'Yes'; # your favorite way to say 'No' $no = 'No'; -# default hopcount to use - note this will override any incoming hop counts, if they are greater -$def_hopcount = 7; - -# root of directory tree for this system -$root = "/spider"; +# the interval between unsolicited prompts if not traffic +$user_interval = 11*60; # data files live in $data = "$root/data";