That's covered in perlfaq5 under How can I tell whether there is a character waiting on a filehandle. Yes... it also covers determining how many bytes are available from the filehandle. The gist of it, however, seems to be that there isn't a very portable way, and that solutions may have to be tailored to your specific environment.

It seems like "There ought to be a module for that.", and there probably is.