A PIX only allows telnet to the "inside" interface and you have to be
listed as a trusted host (telhet <IP addr? [</mask>]. Can you telnet i ok
yourself from that machine?
If that's all ok, I would guess it's a problem with Prompt. Net::Telnet
uses a pattern match to determine if it's time to send data, so when it
sees username:, it sends the username.. The best thing to do would be to
manually set the promtp value for your login command (see perldoc
Net::Tenet:Cisco) to '/:/', which should match most login prompts.
R
At 15:24 02/10/2002 -0700, JasonYahoo wrote:
>Hi,
>I am a new perl user. I have problem telnet to Cisco
>PIX Firewall. Following is my testing perl script. I
>used net::telnet::cisco module telnet to Cisco routers
>or switches no problem. But, Cisco PIX Firewall not
>working. Please give me some advises.
>
>use Net::Telnet::Cisco;
>use strict;
>
>my $cnt_total=0;
>my $result ='Active';
>my $host1='192.168.1.1'; #--- PIX Firewall inside
>Interface
>my $username1='';
>
>my $password1='pix123'; #---- The password tested fine
>by manually telnet
>
>my $password_enable1='pix456';
>my @cmd_output=();
>
>my $objt=Net::Telnet::Cisco->new(Errmode=>'return');
>my $ok=$objt->open($host1) or $result ='NotActive';
>print " Telnet (Port25) on $host1 is $result\n"; #---
>Test
>
>if ($result eq 'Active') {
>my $login_ok1=$objt->login($username1, $password1);
>my $login_ok2=$objt->enable($password_enable1);
>print "host1 / login_ok1 / login_ok2 = $host1 /
>$login_ok1 / $login_ok2\n"; #--- Test
>
>if ($login_ok2) {
>@cmd_output=$objt->cmd('terminal length 0'); #--- turn
>off paging
>@cmd_output = $objt->cmd('show ver');
>
>print @cmd_output;
>
>} #--- end if ($login_ok2)
>} #--- end if ($result eq 'Active')
>$ok=$objt->close;
>
>
>
>__________________________________________________
>Do you Yahoo!?
>New DSL Internet Access from SBC & Yahoo!
>http://sbc.yahoo.com
>
>--
>To unsubscribe, e-mail: [EMAIL PROTECTED]
>For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
