Select Code to Download

my %fullwidth_to_narrow = map chr, (
   ( map { $_ => $_-0xFF01+0x21 } 0xFF01..0xFF5E ),
...
   0xFFE5 => 0x00A5,
   0xFFE6 => 0x20A9,
);