make sh/contest async
[spider.git] / cmd / show / wm7d.pl
index 6dfb5b14172a8885511fd9fa97055eb19565c6e4..291823d7f8be2aa903844fb6d89130a37e48f4a2 100644 (file)
@@ -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,