#!/usr/bin/env perl
use utf8;
###############################################################################
# This program prints international "Hello, yourname!"
# 
# Copyright © 2016 Richard Lesh.  All rights reserved.
###############################################################################

use strict;
use warnings;

MAIN:
{
    binmode(STDOUT, ":utf8");
    binmode(STDERR, ":utf8");
    binmode(STDIN, ":utf8");
# Arabic
    print "مرحبا ريتشارد!\n";
# Chinese
    print "你好，理查德！\n";
# English
    print "Hello, Richard!\n";
# French
    print "Bonjour, Richard!\n";
# German
    print "Hallo Richard!\n";
# Greek
    print "Γεια σας, Ρίτσαρντ!\n";
# Hebrew
    print "שלום, ריצ'רד!\n";
# Italian
    print "Ciao, Richard!\n";
# Japanese
    print "こんにちは、リチャード！\n";
# Korean
    print "안녕, 리차드!\n";
# Russian
    print "Привет, Ричард!\n";
# Spanish
    print "¡Hola, Ricardo!\n";
}