# because I have the 'power of perl' available that avoids me getting
# terminally bored sorting out other people's sloppyness.
#
-# $Id$
+#
#
# Copyright (c) 2001 - Dirk Koopman G1TLH
#
#
# Copyright (c) 2000 Dirk Koopman
#
-# $Id$
+#
#
package AnnTalk;
#
# Copyright (c) 1999 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package BBS;
#
# Copyright (c) 2000 Dirk Koopman
#
-# $Id$
+#
#
package BadWords;
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Bands;
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package CmdAlias;
#
# Copyright (c) 1999 Dirk Koopman G1TLH
#
-# $Id$
+#
#
# The colour pairs are:-
#
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXBearing;
#
# Copyright (c) 1998-2000 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXChannel;
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXCommandmode;
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXConnect;
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXCron;
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXDebug;
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXHash;
#
# Copyright (c) - 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXLog;
#
# Copyright (c) - 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXLog;
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXM;
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
#
# Notes for implementors:-
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXProt;
#
# Copyright (c) 1998-2006 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXProt;
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXProt;
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXProt;
#
# The master SQL module
#
-# $Id$
+#
#
# Copyright (c) 2006 Dirk Koopman G1TLH
#
#
# Stuff like table creates and (later) alters
#
-# $Id$
+#
#
# Copyright (c) 2005 Dirk Koopman G1TLH
#
#
# Stuff like table creates and (later) alters
#
-# $Id$
+#
#
# Copyright (c) 2005 Dirk Koopman G1TLH
#
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXUser;
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package DXUtil;
# The system variables - those indicated will need to be changed to suit your
# circumstances (and callsign)
#
-# Copyright (c) 1998 - Dirk Koopman G1TLH
+# Copyright (c) 1998-2007 - Dirk Koopman G1TLH
#
-# $Id$
#
package main;
#
# XML handler
#
-# $Id$
+#
#
# Copyright (c) Dirk Koopman, G1TLH
#
#
# XML (R)Cmd handler
#
-# $Id$
+#
#
# Copyright (c) Dirk Koopman, G1TLH
#
#
# XML DX Spot handler
#
-# $Id$
+#
#
# Copyright (c) Dirk Koopman, G1TLH
#
#
# XML IM handler (Chat, Announces, Talk)
#
-# $Id$
+#
#
# Copyright (c) Dirk Koopman, G1TLH
#
#
# XML Ping handler
#
-# $Id$
+#
#
# Copyright (c) Dirk Koopman, G1TLH
#
#
# XML Text handler
#
-# $Id$
+#
#
# Copyright (c) Dirk Koopman, G1TLH
#
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Editable;
# An instance of this is setup by a command together with a load
# of callbacks and then runs with a state machine until completion
#
-# $Id$
+#
#
# Copyright (c) 2001 - Dirk Koopman G1TLH
#
# This is where the cluster handles direct connections coming both in
# and out
#
-# $Id$
+#
#
# Copyright (c) 2001 - Dirk Koopman G1TLH
#
#
# Copyright (c) 1999 Dirk Koopman G1TLH
#
-# $Id$
+#
#
# The NEW INSTRUCTIONS
#
#
# Copyright (c) 1999 - Dirk Koopman, Tobit Computer Co Ltd
#
-# $Id$
+#
#
package ForkingServer;
#
# Copyright (c) 1998 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Geomag;
# This class is the internal subclass that deals with the internal port 27754
# communications for Msg.pm
#
-# $Id$
+#
#
# Copyright (c) 2001 - Dirk Koopman G1TLH
#
#
# Copyright (c) 2000 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Internet;
#
# Copyright (c) 2004 Dirk Koopman, G1TLH
#
-# $Id$
+#
#
use strict;
#
# Utility routines for handling Iso 8601 date time groups
#
-# $Id$
+#
#
# Copyright (c) Dirk Koopman, G1TLH
#
#
# Copyright (c) - 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
use strict;
#
# Copyright (c) 2002 Dirk Koopman, Tobit Computer Co Ltd
#
-# $Id$
+#
#
# The structure of the objects stored are:-
#
#
# Copyright (c) Dirk Koopman
#
-# $Id$
+#
#
package Log::Agent;
# this file contains the system messages. Don't forget to reload them
# if you change them (load/messages)
#
-# $Id$
#
package DXM;
# MINIMUF 3.5 from QST December 1982
# (originally in BASIC)
#
-# $Id$
+#
#
#
#
# Copyright (c) - 2002 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Mrtg;
#
# I have modified it to suit my devious purposes (Dirk Koopman G1TLH)
#
-# $Id$
+#
#
package Msg;
#
# Copyright (c) - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Prefix;
#
# Copyright (c) - 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
use strict;
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Route;
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Route::Node;
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Route::User;
#
# Copyright (c) 2004 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package RouteDB;
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Script;
#
# Copyright (c) - 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
package Spot;
#
# Copyright (c) 1999 - Steve Franke K9AN
#
-# $Id$
+#
#
# 2005/02/25 add calculation of civil dawn and dusk, defined to be times
# when solar zenith angle is 96 degrees.
#
# This is the new fundamental protocol engine handler
#
-# $Id$
+#
#
# Copyright (c) 2004 Dirk Koopman G1TLH
#
#
# This uses callbacks. BE CAREFUL!!!!
#
-# $Id$
+#
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
#
# This class will morph into (and is the test bed for) Multicasts
#
-# $Id$
+#
#
# Copyright (c) 2002 - Dirk Koopman G1TLH
#
#
# Copyright (c) 2002 Dirk Koopman G1TLH
#
-# $Id$
+#
#
use strict;
$version = '1.54';
$subversion = '0';
-$build = '82';
+$build = '83';
1;
#
# Copyright (c) 2000 - Dirk Koopman G1TLH
#
-# $Id$
+#
#
package WCY;
#
# from an idea by Steve Franke K9AN and information from Angel EA7WA
#
-# $Id$
+#
#
my ($self, $line) = @_;
my @list = split /\s+/, $line; # generate a list of callsigns
#
# Copyright (c) 1999 - Dirk Koopman, Tobit Computer Co Ltd
#
-# $Id$
+#
#
package main;
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
require 5.004;
#
# Copyright (c) Dirk Koopman G1TLH
#
-# $Id$
+#
#
# search local then perl directories
#
# Copyright (c) 1999 Dirk Koopman G1TLH
#
-# $Id$
+#
#
require 5.004;
#
# Copyright (c) 2000 Dirk Koopman G1TLH
#
-# $Id$
+#
#
require 5.004;
#
# Copyright (c) - Dirk Koopman G1TLH
#
-# $Id$
+#
#
require 5.004;
#
# Copyright (c) 2003 Dirk Koopman G1TLH
#
-# $Id$
+#
#
# search local then perl directories
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
# make sure that modules are searched in the order local then perl
# for that day. This may then give strange 'out of order' results when viewed
# with the show/dx command
#
-# $Id$
+#
#
# Copyright (c) 1998-2003 Dirk Koopman G1TLH
#
#
# Copyright (c) 2002 Dirk Koopman G1TLH
#
-# $Id$
+#
#
use strict;
#
# Copyright (c) - 1999 Dirk Koopman G1TLH
#
-# $Id$
+#
#
require 5.004;
#
# Copyright (c) 2004 Dirk Koopman G1TLH
#
-# $Id$
+#
#
use strict;
#
# Copyright (c) 2004 Dirk Koopman G1TLH
#
-# $Id$
+#
#
use strict;
#
# create a version and build id for the project using git ids
#
-# $Id$
+#
#
# Copyright (c) 2007 Dirk Koopman, G1TLH
#
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
# make sure that modules are searched in the order local then perl
#
# Copyright (c) 2005 Dirk Koopman G1TLH
#
-# $Id$
+#
#
# make sure that modules are searched in the order local then perl
use strict;
#
# Copyright (c) 2004 Dirk Koopman G1TLH
#
-# $Id$
+#
#
use strict;
<address><a href="mailto:djk@tobit.co.uk"></a>Dirk Koopman G1TLH</address><br>
<!-- Created: Sat Sep 4 21:11:44 BST 1999 -->
<!-- hhmts start -->
-Last modified: Sat Sep 4 23:50:50 BST 1999
+Last modified: Sun Jun 24 02:15:14 BST 2007
<!-- hhmts end -->
<hr>
<h4>Some thoughts</h4>
two cluster nodes.
</p>
<br>
- <hr>
- Document $Id$
</body>
</html>
#
# Copyright (c) 1998-2000 Dirk Koopman G1TLH
#
-# $Id$
-#
+
# search local then perl directories
BEGIN {
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
-# $Id$
+#
#
# make sure that modules are searched in the order local then perl
use strict;
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
-# $Id$
+#
#
# make sure that modules are searched in the order local then perl
# It's very scrappy, but it *does* do enough to allow SysOp console access. It also
# means that since it's perl, Dirk might pretty it up a bit :-)
#
-# $Id$
+#
#
# Iain Philipps, G0RDI 03-Mar-01
#