X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2FDXVars.pm;fp=perl%2FDXVars.pm;h=0000000000000000000000000000000000000000;hb=9da1742219a27b1c02fd57794412088e4d7b3d1d;hp=ab43ca6489195ae63c7f3f8f87de45f3b4ff8cb8;hpb=a53dd3ac43ba8336e30057aa39220e71c925a197;p=spider.git diff --git a/perl/DXVars.pm b/perl/DXVars.pm deleted file mode 100644 index ab43ca64..00000000 --- a/perl/DXVars.pm +++ /dev/null @@ -1,90 +0,0 @@ -# -# The system variables - those indicated will need to be changed to suit your -# circumstances (and callsign) -# -# Copyright (c) 1998 - Dirk Koopman G1TLH -# -# $Id$ -# - -package main; - -require Exporter; -@ISA = qw(Exporter); - -@EXPORT_OK = qw($mycall $myname $myalias $mylatitude $mylongtitude $mylocator - $myqth $myemail $myprot_version - $clusterport $clusteraddr $debugfn - $def_hopcount $data $system $cmd - $userfn $motd $local_cmd $mybbsaddr - $lang - $pc50_interval $user_interval - ); - - -# this really does need to change for your system!!!! -$mycall = "GB7DJK"; - -# your name -$myname = "Dirk"; - -# Your 'normal' callsign -$myalias = "G1TLH"; - -# Your latitude (+)ve = North (-)ve = South in degrees and decimal degrees -$mylatitude = +52.68584579; - -# Your Longtitude (+)ve = East, (-)ve = West in degrees and decimal degrees -$mylongitude = +0.94518260; - -# Your locator (yes I know I can calculate it - eventually) -$mylocator = "JO02LQ"; - -# Your QTH (roughly) -$myqth = "East Dereham, Norfolk"; - -# Your e-mail address -$myemail = "djk\@tobit.co.uk"; - -# Your BBS addr -$mybbsaddr = "G1TLH\@GB7TLH.#35.GBR.EU"; - -# the default language (the key used must match the one in the Messages file) -$lang = 'en'; - -# the tcp address of the cluster this can be an address of an ethernet port -# but this is more secure. For normal use this will be fine. -$clusteraddr = "localhost"; - -# the port number of the cluster (just leave this, unless it REALLY matters to you) -$clusterport = 27754; - -# your favorite way to say 'Yes' -$yes = 'Yes'; - -# your favorite way to say 'No' -$no = 'No'; - -# the interval between unsolicited prompts if not traffic -$user_interval = 11*60; - -# data files live in -$data = "$root/data"; - -# system files live in -$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"; - -# are we debugging ? -@debug = ('chan', 'state', 'msg', 'cron');