@lines = $t->cmd("who");