while(<$telnet>){ print STDERR $_; };