Regex para mayúsculas Unicode no coincide con "Ó"?

Question

Parece que no reconoce el Ó acentuados en mayúsculas

#!/usr/bin/env perl 
use strict; 
use warnings; 
use 5.14.0; 
use utf8; 
use feature 'unicode_strings'; 

" SIMÓN " =~ /^\s+(\p{Upper}+)/u; 
print "$1\n"; 

vuelve

SIM 

Perl debe ser capaz de utilizar los datos Unicode, que ya Etiquetas Ó en mayúsculas. De emacs describe-char

character code properties: customize what to show 
    name: LATIN CAPITAL LETTER O WITH ACUTE 
    old-name: LATIN CAPITAL LETTER O ACUTE 
    general-category: Lu (Letter, Uppercase) 
    decomposition: (79 769) ('O' '́') 

Answer 1

que se está perdiendo use open ':std', ':locale'; para codificar correctamente su salida.

Si eso no funciona, su archivo no está codificado usando UTF-8 aunque le dice a Perl que sí.