https://wp.jochen.hayek.name/blog-en/2018/08/15/how-do-i-encode-utf-8-characters-into-numeric-character-reference-format-in-perl/