Item11267: fix construction of perl regex