make sh/contest async
[spider.git] / cmd / show / wm7d.pl
index 097a6295824730e66b229387069cc1c83906d141..291823d7f8be2aa903844fb6d89130a37e48f4a2 100644 (file)
@@ -5,7 +5,7 @@
 #
 # Copyright (c) 2002 Charlie Carroll K1XX
 #
-# $Id$
+#
 #
 
 # wm7d accepts only single callsign
@@ -21,7 +21,8 @@ my $port = 5000;
 my $cmdprompt = '/query->.*$/';
 
 my($info, $t);
-                                    
+
+use Net::Telnet;
 $t = new Net::Telnet;
 $info =  $t->open(Host    => $target,
                  Port    => $port,