Hello
I am running perl and making telnet calls using the Net::Telnet module, overall Net::Telnet works great! One issue I am having is capturing what is coming back from some sites, when I do not know what to expect.
Here is my telnet session set up:
sub Telnet
{ #This function will make or at least try to make the telnet connetion
$telnet = new Net::Telnet(Timeout=>30,
Port=>$_[1],
Input_log=>$Debug_Fi,
Output_log=>$Debug_Fil,
Errmode=>sub{Telnet_Error(@_,@Telnet_err)}
);
$telnet->open($_[0]);
}#End of Telnet
When I connect to a site, and use the "match" statement and find a match the Input_log has text in it, but if I do not match anything the Input_log is empty. Is there a way to capture everything that is sent when you have no idea what to match?
I am running perl and making telnet calls using the Net::Telnet module, overall Net::Telnet works great! One issue I am having is capturing what is coming back from some sites, when I do not know what to expect.
Here is my telnet session set up:
sub Telnet
{ #This function will make or at least try to make the telnet connetion
$telnet = new Net::Telnet(Timeout=>30,
Port=>$_[1],
Input_log=>$Debug_Fi,
Output_log=>$Debug_Fil,
Errmode=>sub{Telnet_Error(@_,@Telnet_err)}
);
$telnet->open($_[0]);
}#End of Telnet
When I connect to a site, and use the "match" statement and find a match the Input_log has text in it, but if I do not match anything the Input_log is empty. Is there a way to capture everything that is sent when you have no idea what to match?