I am trying to establish an interface with the Sage 935AT using Perl. I wish to issue commands and capture results using a terminal server connection. When I telnet into the Sage through the terminal server, the normal interface for the Sage is what a colleague calls "cursive". In other words, the menu is stagnant, but only one line changes depending on the command given.
Here is my script
$tn = new Net::Telnet ( Telnetmode => 0);
$tn->open(Host => $IP,
Port => 2008);
# send command "H" to start sage interface
# get anything printed out to interface
@sage = $tn->waitfor('/.+/i');
print "printing sage\n";
Here is the output that I get.
√☺ √♥ ²↑ ²▼