ask help(cant telnet with perl-module)
[email protected] ("henry") Thu, 21 Feb 2002 13:43:33 +0800
| Newsgroups | perl.perlpoint |
|---|---|
| Message-ID | <002601c1ba9a$b33046e0$df00a8c0@henry> |
------=_NextPart_000_0023_01C1BADD.C13B1CE0
Content-Type: text/plain;
charset="big5"
Content-Transfer-Encoding: quoted-printable
Dear List:
My cpan-module is not well-installed :
<procedures to install >
1. choose full_install to install linux ( Redhat or slackware),=20
type "rpm -q perl" to make sure it's well_installed .
2. download Net-telnet-3.02.tar.gz from www.cpan.org =20
3. a. untar it=20
b. perl Makefile.PL
c. make test
l=20
Then I got
PERL_DL_NONLAZY=3D1 /usr/bin/perl -Iblib/arch -Iblib/lib =
-I/usr/lib/perl5/i386-linux -I/usr/lib/perl5 -e 'use Test::Harness =
qw(&runtests $verbose); $verbose=3D0; runtests @ARGV;' t/*.t
t/select............FAILED test 3
Failed 1/3 tests, 66.67% okay
Failed Test Status Wstat Total Fail Failed List of Failed
-------------------------------------------------------------------------=
-------
t/select.t 3 1 33.33% 3
Neglect the fail, I still "make install" , then execute script as =
follows :
use Net::Telnet ();
$t =3D new Net::Telnet (Timeout =3D> 20,
Prompt =3D> '/bash\$ $/');
$t->open("sparky");
$t->login($username, $passwd); <----------Then I got time out for =
waiting at line 5 ,but I can telnet the host normally(not use =
perl-script)=20
@lines =3D $t->cmd("/usr/bin/who");
print @lines;
=20
Could you perl-fans shed some light on it ?=20
=20
BestRegards
Henry
------=_NextPart_000_0023_01C1BADD.C13B1CE0--