Escape % in regex due to deprecation warnings from perl 5.17.