in reply to using functions within regex

See s///e in Regexp Quote Like Operators

In Section Seekers of Perl Wisdom