added installation notes and licence

[spider.git] / perl / cluster.pl

diff --git a/perl/cluster.pl b/perl/cluster.pl
index f1759ef5a01e80a178d2210206081afa50ca5409..9511435d72200b4b3cb3f76c726383dcc57882ab 100755 (executable)
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -16,8 +16,8 @@ BEGIN {
   $root = "/spider"; 
   $root = $ENV{'DXSPIDER_ROOT'} if $ENV{'DXSPIDER_ROOT'};
 
-  unshift @INC, '$root/perl';  # this IS the right way round!
-  unshift @INC, '$root/local';
+  unshift @INC, "$root/perl";  # this IS the right way round!
+  unshift @INC, "$root/local";
 }
 
 use Msg;
@@ -170,6 +170,9 @@ foreach(@debug) {
 }
 STDOUT->autoflush(1);
 
+# banner
+print "DXSpider DX Cluster Version $version\nCopyright (c) 1998 Dirk Koopman G1TLH\n";
+
 # load Prefixes
 print "loading prefixes ...\n";
 Prefix::load();