use feature ':5.10';
my $foo = '⁦JenAFifield⁩';
foreach my $i (0..length($foo)) {
    $char = substr($foo,$i,1);
    $charnum = ord($char);
    say "$char\t$charnum"; 
}

##</code><code>##

�	226
�	129
�	166
J	74
e	101
n	110
A	65
F	70
i	105
f	102
i	105
e	101
l	108
d	100
�	226
�	129
�	169