my (@array)=$telnet->cmd(string => 'ls', prompt => '/=>/');