use strict; use warnings; use feature 'unicode_strings'; use open ":locale"; use utf8; print "Çrçös\n"; print "Çirçös—\n";