X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXVars.pm;h=11c26012735ede6361f65eae60b3ef50ffce02c7;hb=f46017e7bef9ee062cd5a8648d214eabe585da25;hp=23367a144fde52452f5c20ff6dd9447ab6b1b178;hpb=0017002e2dc438d49fcc090dc99b6d22f7037aa7;p=spider.git diff --git a/perl/DXVars.pm b/perl/DXVars.pm index 23367a14..11c26012 100644 --- a/perl/DXVars.pm +++ b/perl/DXVars.pm @@ -12,22 +12,22 @@ package main; require Exporter; @ISA = qw(Exporter); -@EXPORT_OK = qw($mycall $myname $mynormalcall $mylatitude $mylongtitude $mylocator +@EXPORT_OK = qw($mycall $myname $myalias $mylatitude $mylongtitude $mylocator $myqth $myemail $myprot $clusterport $clusteraddr $debugfn $def_hopcount $root $data $system $cmd - $userfn + $userfn $motd $local_cmd $mybbsaddr ); # this really does need to change for your system!!!! -$mycall = "GB7TLH"; +$mycall = "GB7DJK"; # your name $myname = "Dirk"; # Your 'normal' callsign -$mynormalcall = "G1TLH"; +$myalias = "G1TLH"; # Your latitude (+)ve = North (-)ve = South in degrees and decimal degrees $mylatitude = +52.68584579; @@ -42,7 +42,10 @@ $mylocator = "JO02LQ"; $myqth = "East Dereham, Norfolk"; # Your e-mail address -$myemail = "djk@tobit.co.uk"; +$myemail = "djk\@tobit.co.uk"; + +# Your BBS addr +$mybbsaddr = "G1TLH\@GB7TLH.#35.GBR.EU"; # the tcp address of the cluster and so does this !!! $clusteraddr = "dirk1.tobit.co.uk"; @@ -71,5 +74,11 @@ $system = "$root/sys"; # command files live in $cmd = "$root/cmd"; +# local command files live in (and overide $cmd) +$localcmd = "$root/local_cmd"; + # where the user data lives $userfn = "$data/users"; + +# the "message of the day" file +$motd = "$data/motd";