Try tm->cmd(‘export
TERM=vt100’)
-邮件原件-
发件人: Andrew Timberlake-Newell
[mailto:[EMAIL PROTECTED]
发送时间: 2003年7月19日 4:12
收件人:
[EMAIL PROTECTED];
[EMAIL PROTECTED]
主题: [Perl-unix-users] Net::Telnet
and Term Type
I need to set the Telnet
terminal type option for a tel
I need to set the Telnet terminal type option for a telnet connection
using Net::Telnet. Does anyone know how to do that?
My script is connecting to the system and processing most
commands just fine. (So I know it
is NOT related to my prompt setting.)
The problem comes when I try to
Dear All,
This is the code that i have used to get the who result from the
Telnet. i got the error as " Timed out waiting for command prompt ".
use Net::Telnet ();
$t = new Net::Telnet (Timeout => 10,
Prompt => '/bash\$ $/');
$t->open("pon
Jenda Krynicky wrote, on Thursday, June 07, 2001 5:16 AM
> The difference between
> use Module;
> and
> use Module ();
> is that in the first case all functions and variables from
> @Module::EXPORT are exported, while in the second are not.
Oops, you are totally correct of course. My apologies f
> Hello, Mr. Zalewski,
>
> I just checked one of my scripts that uses Net::Telnet, and I invoked the
> package without parentheses, a la
>
> use Net::Telnet;
>
> rather than the way you have it,
>
> use Net::Telnet ();
>
> so perhaps give that a try? Cheers,
>
> -Mark Beihoffer
That should
> I'm trying to set up Net::Telnet so I may or may not have done it correctly. It
>also gave an example program that I tried, but I got an error.
> Example program:
> use Net::Telnet ();
> $t = new Net::Telnet (Timeout => 10, Prompt => '/bash\$ $/');
> $t->open ("sparky");
> $t->login($username
/index.pl?node_id=45946&lastnode_id=131
- Original Message -
From: Mr. Zalewski <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, June 06, 2001 3:13 PM
Subject: [Perl-unix-users] Net::Telnet
> I'm trying to set up Net::Telnet so I may or may not hav
I'm trying to set up Net::Telnet so I may or may not have done it correctly. It also
gave an example program that I tried, but I got an error.
Example program:
use Net::Telnet ();
$t = new Net::Telnet (Timeout => 10, Prompt => '/bash\$ $/');
$t->open ("sparky");
$t->login($username, $passwd);
@
