print($regexp)  Expect        Gives
--------------  ------------  ----------
\Q*\E\Q*\E      \*\*          \*\Q*\E
\Q**LOL**       \*\*LOL\*\*   \Q**LOL**
\\Quit\\Exit    \\Quit\\Exit  \Quit\Exit
\Qfoo\\E        foo\\\\E      foo\\