problem sending "reboot" command through Net::Telnet

[p5pRT]

Migrated from rt.perl.org#3453 (status was 'resolved')

Searchable as RT3453$

[p5pRT]

From dnguye1@nortelnetworks.com

Hi Sir/Madam,
I have a problem with sending "reboot" command while using Perl.

In my main program, I wrote​:

after I telnet to a system then

print "Send reboot command\n";
  my @​output = $TELNET_ID->cmd(String => "reboot", # line 187
  Prompt => '/->/',
  Timeout=> 60);
  print @​output;

But I have this kind of error after it reached to "reboot"

Tk​::Error​: unexpected read error​: Unknown error at brm_test.pl line 187
Net​::Telnet​::_croak at D​:/Perl/lib/Net/Telnet.pm line 1830
Net​::Telnet​::error at D​:/Perl/lib/Net/Telnet.pm line 573
Net​::Telnet​::cmd at D​:/Perl/lib/Net/Telnet.pm line 371
main​::browse at brm_test.pl line 187
main​::__ANON__ at brm_test.pl line 97
(command bound to event)

Please let me know why Perl is killed why it reach to the command "reboot"

I thank you very much. Your input is very important to me.

________________________________________
Dat Nguyen
Nortel Networks - Broadband Wireless Access.
Field Suport Engineer
Tel​: 972-362-8401
Fax​: 972-362-8094
________________________________________

[p5pRT]

From @smpeters

[dnguye1@​nortelnetworks.com - Fri Jun 30 07​:30​:49 2000]​:

Hi Sir/Madam,
I have a problem with sending "reboot" command while using Perl.

In my main program, I wrote​:

after I telnet to a system then

print "Send reboot command\n";
my @​output = $TELNET_ID->cmd(String => "reboot", # line 187
Prompt => '/->/',
Timeout=> 60);
print @​output;

But I have this kind of error after it reached to "reboot"

Tk​::Error​: unexpected read error​: Unknown error at brm_test.pl line 187
Net​::Telnet​::_croak at D​:/Perl/lib/Net/Telnet.pm line 1830
Net​::Telnet​::error at D​:/Perl/lib/Net/Telnet.pm line 573
Net​::Telnet​::cmd at D​:/Perl/lib/Net/Telnet.pm line 371
main​::browse at brm_test.pl line 187
main​::__ANON__ at brm_test.pl line 97
(command bound to event)

Please let me know why Perl is killed why it reach to the command "reboot"

I thank you very much. Your input is very important to me.

Since Net​::Telnet is not part of the Perl core, this error should be
reported to the author of Net​::Telnet, Jay Rogers. I have copied him on
this email. Please contact him if you are still having this problem.

[p5pRT]

@smpeters - Status changed from 'open' to 'resolved'

[p5pRT]

From nick@ing-simmons.net

Steve Peters via RT <perlbug-followup@​perl.org> writes​:

[dnguye1@​nortelnetworks.com - Fri Jun 30 07​:30​:49 2000]​:

Hi Sir/Madam,
I have a problem with sending "reboot" command while using Perl.

In my main program, I wrote​:

after I telnet to a system then

print "Send reboot command\n";
my @​output = $TELNET_ID->cmd(String => "reboot", # line 187
Prompt => '/->/',
Timeout=> 60);
print @​output;

But I have this kind of error after it reached to "reboot"

Tk​::Error​: unexpected read error​: Unknown error at brm_test.pl line 187
Net​::Telnet​::_croak at D​:/Perl/lib/Net/Telnet.pm line 1830
Net​::Telnet​::error at D​:/Perl/lib/Net/Telnet.pm line 573
Net​::Telnet​::cmd at D​:/Perl/lib/Net/Telnet.pm line 371
main​::browse at brm_test.pl line 187
main​::__ANON__ at brm_test.pl line 97
(command bound to event)

Please let me know why Perl is killed why it reach to the command "reboot"

Because the machine at the other end rebooted. That means presumably
as it closed down it closed the socket that was talking to the telnet,
and perhaps not gracefully but by killing the process running on the target.

I thank you very much. Your input is very important to me.

Since Net​::Telnet is not part of the Perl core, this error should be
reported to the author of Net​::Telnet, Jay Rogers. I have copied him on
this email. Please contact him if you are still having this problem.