$xTelnet = new Net::Telnet (Timeout => 'undef',
           Prompt =>'/[\%\#\>\$] $/',);