. "Yes, I read How can I tell whether there is a character waiting on a filehandle? in perlfaq5 but he is probably little portable." . . .