in reply to s/// treat rhs as regex

This wheel has already been invented.

In Section Seekers of Perl Wisdom