X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FInternet.pm;h=89ef472129644914c8b1f21d8f40146e6c5d7037;hb=refs%2Fheads%2Fip_address;hp=b6a387ee36fb98bc03d0da059e263b2f36fdc060;hpb=6624dcdf07d628e8d6a16fc6549edf40be25b7b2;p=spider.git

diff --git a/perl/Internet.pm b/perl/Internet.pm
index b6a387ee..89ef4721 100644
--- a/perl/Internet.pm
+++ b/perl/Internet.pm
@@ -8,7 +8,7 @@
 #
 # Copyright (c) 2000 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 
 package Internet;
@@ -29,6 +29,7 @@ $allow = 0;
 # $qrz_uid = 'gb7xxx';
 #
 
+
 $qrz_uid = undef;
 
 #
@@ -58,7 +59,32 @@ $http_proxy = undef;
 
 $http_proxy_port = undef;
 
+#
+# list of urls and other things that are used in commands, here so that they
+# can be changed if necessary.
+#
 
+$qrz_url = 'www.qrz.com';     # used by show/qrz
+$wm7d_url = 'www.wm7d.net';   # used by show/wm7d
+$db0sdx_url = 'www.qslinfo.de'; # used by show/db0sdx
+$db0sdx_path = '/qslinfo';
+$db0sdx_suffix = '.asmx';
+$dx425_url = 'www.ariscandicci.it';		# used by show/425
+$contest_host = 'www.sk3bg.se';         # used by show/contest
+$contest_url = "http://$contest_host/contest/text";         # used by show/contest
+
+#SHOW/IK3QAR <callsign> Show the 5 most recent informations found on IK3QAR
+##Callsign Database about QSL Manager, Manager address and comments. This
+##command works for sysop subscribed for the service at:
+##    http://www.ik3qar.it/manager/dxc.php
+##Write the given password below in $ik3qar_pw
+#
+$ik3qar_url = 'www.ik3qar.it';    # used by show/ik3qar
+$ik3qar_pw = 'PUT-PASSWORD-HERE';    # used by show/ik3qar
+
+# NOTE: you must copy $ik3qar_* lines to local/Internet.pm for them to have
+# any effect on an already running node.
+#
 #
 # end
 #