my @response = $telnet->cmd("exit"); print $_ while @response;