/fred(?(?{ (pos()-4) % $n })(?!))($capture)/g