Re: Parsing Net::Telnet Console Ouput

Update: The telnet server application was an informix database and wouldn't support tty. I finally was able to craft the solution I wanted by passing the terminal output to HTML::FromANSI. A really slick module that parses the terminal data and escape sequences into HTML.

use HTML::FromANSI qw|%Options ansi2html|;
$t=new Net::Telnet(Binmode=>1,Timeout =>20, Prompt=>'/\?/');
$t->dump_log("telnet.log");
$t->open("host");
$t->login("user","pword");

###fetch terminal output here...store in $output

$t->close();

###HTML::FromANSI portion
$Options{fill_cols} = 1;  #preserve spacing
print "<HTML><HEAD><TITLE>Results</TITLE></HEAD><BODY>".
      ansi2html("$output").
      "</BODY></HTML>";
[download]

Comment on Re: Parsing Net::Telnet Console Ouput Download Code