[galaxy-dev] pass regular expression

Hi all, I am trying to develop a tool which allows the user to use regular expression to only keep the lines matching the given pattern in the output. There are many special characters, e.g. \ in \d. In the perl script the wrapper invokes, the regular expression is printed as Xd+ for the regular expression \d+. My question is how to pass these special characters including \, (, ), ^ etc. correctly into the perl script. Best regards! Jun