Most efficient way to convert a run of Perl substitutions til boost::regex?