Christopher Fowler wrote: > perl -MIO::Socket -e '$s = new IO::Socket::INET(PeerAddr=>"127.0.0.1", > PeerPort=> 23, Proto =>"tcp") or die "$!\n";' Thank you Chris, I will try that. -Jim P.