Como perl
converter do formato de meia largura para largura total ? No perl
termo de, do caráter normal ao caráter amplo.
Por exemplo, de !abc ABC!
para !abc ABC!
. Aritmeticamente, o seguinte deve estar correto
binmode STDOUT, ":utf8";
$letter = 'A';
$lw = chr($letter + 0xfee0);
print "Hello $lw ($letter)!\n";
Mas a impressão não é o que eu esperava, o que deveria serHello A (A)!