use IO::Select if you want to hand-roll a solution to simply watch two handles simultaneously, or POE to keep from reinventing all the eventual stuff you'll add above that (line-breaking, other processes, protocols, etc).