automate switch commands for Nortel Baystack

download the perl script loop.pl

# yum install perl-Net-Telnet

# chmod +x loop.pl
# ./loop.pl <switch IP Address>
  loop.pl version 1.0.0; running on linux; perl version 5.008008
  Connecting with Telnet to ...........OK
  sysUpTime:             31 days, 21:49:32
  sysUpTime:             31 days, 21:49:39
  sysUpTime:             31 days, 21:49:46
  sysUpTime:             31 days, 21:49:53
  sysUpTime:             31 days, 21:50:00
  sysUpTime:             31 days, 21:50:07
  sysUpTime:             31 days, 21:50:14
  sysUpTime:             31 days, 21:50:21
  sysUpTime:             31 days, 21:50:28
  sysUpTime:             31 days, 21:50:35

Reference:
http://cosimo.europe.nortel.com/Scripts/acg.pl/acg.pl