Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Programatically telnet to Definity EPABX using Perl

Terminal Emulation

Programatically telnet to Definity EPABX using Perl

by  globalvasu  Posted    (Edited  )

When I telnet to Avaya Definity EPABX from a pc with Terminal emulation AT&T513, I get the Output Properly.
But if I do the same thing using perl I get junk characters in the output. How do I avoid these junk characters in the output when I telnet using Net:Telnet in perl

OUTPUT WHAT I GET WHEN I LOGIN THROUGH PERL
===================================================
ü¬[1GMember Port Service State Mtce Connected Ports

ü¬[1G Busy

ü¬[1G014/113ü¬[9G10A0619 ü¬[18Gin-service/idle ü¬[37Gno ü¬[42G ü¬[51G
ü¬[60G ü¬[69G

ü¬[1G014/114ü¬[9G10A0620 ü¬[18Gin-service/idle ü¬[37Gno ü¬[42G ü¬[51G
ü¬[60G ü¬[69G

ü¬[1G014/115ü¬[9G10A0621 ü¬[18Gin-service/idle ü¬[37Gno ü¬[42G ü¬[51G
ü¬[60G ü¬[69G

=======================================================

OUTPUT I GET WHEN I DO THE TELNET MANUALY
=======================================================
Member Port Service State Mtce Connected Ports
Busy

014/001 09A1501 in-service/active no 02A1708 06A1309
014/002 09A1502 in-service/active no 05A1107
014/003 09A1503 in-service/active no 05A1016
======================================================
Register to add this FAQ to your archive
Register to rate this FAQ  : BAD 1 2 3 4 5 6 7 8 9 10 GOOD
Please Note: 1 is Bad, 10 is Good :-)

Part and Inventory Search

Back
Top