Interesting. I would have thought that promoting the regexp would have been enough. Anyway, the fix to promote the string on which s/// acts. Change
utf8::upgrade($from);  # Use Unicode semantics
to
utf8::upgrade($_);  # Use Unicode semantics