Perl - Lowercase Accent Letters

Question

Using Perl, i'm trying to lowercase words with accents and special chars with lc() but i can't.

For example:

É UM MAÇO

returns

É um maÇo

Answer 1

-bash$ perl -we 'use utf8; binmode STDOUT, ":utf8"; print lc "É UM MAÇO"'
é um maço

utf8 indicates your program text is unicode. binmode ensures proper output of wide characters.

You can also use Encode;, see the docs.

Answer 2

Try adding

use locale;

into your script. It should make various functions including lc work with accents. Full testing script:

use strict; use warnings;
use locale;
use utf8;

print lc('É UM MAÇO');    # gives "é um maço"