Of course, I'm assuming that Perl/Tk doesn't also convert the base64 to utf?

Everything's upgraded to utf-8. In case of base64 data this means that the data is left unchanged, other with an added utf-8 flag. But Perl still has to loop over the base64 data to check if there are some high-bit characters.