Regexp::Optimize is meant for just this task except that it won't use the pre-compiled version of your regexp. It'll stringify them first, I think.