Help for this page

Select Code to Download


  1. or download this
    #!C:\perl\bin\perl -w
    use Net::Telnet;
    ...
    print "OUT: @out";
    print "OUT1: @out1";
    print "OUT2: @out2";
    
  2. or download this
    C:\Documents and Settings\toms\Desktop>perl isdn.pl
    OUT: ADTRAN TSUIQ VER 333a  0464
    ...
     [23;1H_____________________________________________________________
    +__________
    _______[24;2H[KEnter Selection -OUT1: 1OUT2: 1
    C:\Documents and Settings\toms\Desktop>