If you call core four arg select or use IO::Select to read the output, you can specify a timeout as the fourth argument. The need to use fileno-based bitmaps in the select call is not pretty, but worth it.

After Compline,
Zaxo