add a first cut at an incoming only AGW engine shim for M$

[spider.git] / perl / AGWConnect.pm

diff --git a/perl/AGWConnect.pm b/perl/AGWConnect.pm
new file mode 100644 (file)
index 0000000..c19055e
--- /dev/null
+++ b/perl/AGWConnect.pm
@@ -0,0 +1,36 @@
+#
+# Copy this file to /spider/local and modify it to your requirements
+#
+#
+# This file specifies whether you want to connect to an AGW Engine 
+# You are only likely to want to do this in a Microsoft Windows
+# environment
+#
+
+package AGWMsg;
+
+use strict;
+use vars qw($enable $login $passwd $addr $port $monitor);
+
+# set this to 1 to enable AGW Engine handling
+$enable = 0;
+
+# user name you are logging in as
+$login = '';
+
+# password required
+$passwd = '';
+
+#
+# -- don't change these unless you know what you are doing --
+#
+# the ip address of the AGW engine you are connecting to
+$addr = "localhost";
+
+# the port number the AGW engine is listening to
+$port = 8000;
+
+# default monitor status
+$monitor = 0;
+ 
+1;