Instead of the print() method

@line = $telnet->print('sh time');
[download]

use the cmd() method

@line = $telnet->cmd('sh time');
[download]

According to the docs, the print() method "prints a string or a comma-separated list of strings to the opened object and returns non-zero if all data was successfully written."

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
F--F--F--F--F--F--F--F--
(the triplet paradiddle)