#!/usr/bin/perl use utf8; use open ':std', ':locale'; print "Çirçös\n";