$ perl -wE 'use utf8; binmode STDOUT, ":encoding(UTF-8)"; print "ייייי ", length "ייייי", "\n";'