have you tried using getlines() after your $t->cmd to see more of what is being returned?

You might also check out print() as an alternative to cmd() as outlined in the net::telnet documentation.

As a last resort if you aren't getting the results you expect, I have always found dump_log() to be a good, good friend.