=================================================================== RCS file: /cvs/trango/Net-Telnet-Trango/lib/Net/Telnet/Trango.pm,v retrieving revision 1.9 retrieving revision 1.10 diff -u -r1.9 -r1.10 --- trango/Net-Telnet-Trango/lib/Net/Telnet/Trango.pm 2006/07/14 02:17:29 1.9 +++ trango/Net-Telnet-Trango/lib/Net/Telnet/Trango.pm 2006/07/31 23:16:52 1.10 @@ -1,5 +1,5 @@ package Net::Telnet::Trango; -# $RedRiver: Trango.pm,v 1.8 2006/06/29 00:39:52 andrew Exp $ +# $RedRiver: Trango.pm,v 1.9 2006/07/14 01:17:29 andrew Exp $ use strict; use warnings; use base 'Net::Telnet'; @@ -266,6 +266,10 @@ returns the output from the maclist command +=item maclist_reset + +resets the maclist. No useful output. + =item eth_list returns the output from the eth list command @@ -282,11 +286,12 @@ sulog => { decode => 'sulog', expect => $success }, 'exit' => { no_prompt => 1, cmd_disconnects => 1 }, reboot => { no_prompt => 1, cmd_disconnects => 1 }, - save_sudb => { String => "save sudb", expect => $success }, + save_sudb => { String => 'save sudb', expect => $success }, syslog => { expect => $success }, 'pipe' => { }, # XXX needs a special decode maclist => { }, # XXX needs a special decode and a special expect - eth_link => { String => "eth link", expect => $success }, + maclist_reset => { String => 'maclist reset', expect => 'done' }, + eth_link => { String => 'eth link', expect => $success }, # eth r, w and reset??? #su password??? #_bootloader