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