I tend to pop() off, for example:

@list = $t->cmd('who; echo $?');
$return_code_scalar=pop(@list);
[download]

rather than grep for a pattern in the output list.