Use replace instead of Perl

I wasn't able to figure out how to get perl to treat things as fixed
strings when substituting.