$pattern = eval "qr$pattern" or die $@;


##</code><code>##

s/Bill Clinton/The ex-President/gi on Bill Clinton is the ex-President. bill clinton. results in Failure.