Wie LanX- schon sagte, liegt das Problem bei der RegEx.
Die Variablen $pre und $post musst du mit \Q...\E umschließen, damit enthaltene Sonderzeichen nicht als regulärer Ausdruck interpretiert werden, oder du verwendest gleich eq...

MfG