Select Code to Download

use open ':std', ':locale';
use charnames ':full';
...
    "\N{LATIN CAPITAL LETTER E WITH ACUTE}";
print($word, "\n");
print(ucfirst(lc($word)), "\n");

utf8::upgrade( $word );