$foo=Net::Telnet::Cisco->new( Host => '10.10.10.10' );
$foo->promp($new_prompt);