This is a very good hack. Using Cache::File would be useful with that.

Still there could be a few lines of code that could help speed this up, live.

In my case, the files change often. I guess some caching is in order- or some kind of shared memory thing- a singleton, who knows- that would hold a list readily altered.. hmm.. Still looking for a small hack though..