In the AnyEvent::Intro there is an example that does something very similar to what you are trying to do. See the Introduction to Event-Based Programming section (instead of using STDIN you can obviously use any file handle you want).