#!/usr/bin/env perl use utf8; ############################################################################### # This program prints country names in their native language. # # Copyright © 2016 Richard Lesh. All rights reserved. ############################################################################### use strict; use warnings; MAIN: { binmode(STDOUT, ":utf8"); binmode(STDERR, ":utf8"); binmode(STDIN, ":utf8"); print "Brasil\n"; print "Canada\n"; print "Deutschland\n"; print "France\n"; print "Italia\n"; print "Méjico\n"; print "Österreich\n"; print "Perú\n"; print "Pilipinas\n"; print "Suid-Afrika\n"; print "Türkiye\n"; print "United Kingdom\n"; print "United States\n"; print "Việt Nam\n"; print "Ελλάδα\n"; print "Беларусь\n"; print "Россия\n"; print "ישראל\n"; print "المملكة العربية السعودية\n"; print "مصر\n"; print "इंडिया\n"; print "বাংলাদেশ\n"; print "대한민국\n"; print "中国\n"; print "日本\n"; }