Regarding the regex, I would suggest using ^ and $ along with the /m modifier instead of matching for "\n". On a tangential note, this kind of thing is much simpler if you use Sys::Mmap, like in the wide finder benchmark.