$telnet->print("info -T system:$target"); @infosyst=$telnet->waitfor('/>/i');