http://qs321.pair.com?node_id=1120846


in reply to Re: How to sanely handle unicode in perl?
in thread How to sanely handle unicode in perl?

Line 11 makes no sense. When you add the failure handling, you'll know why:
open STDOUT, ":encoding(UTF-8)" or die $!;
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ